Читайте также: |
|
Умножь на 3.
Первая из них умножает число на экране на 2, вторая – утраивает его. Сколько различных чисел можно получить из числа 2 с помощью программы, которая содержит ровно 3 команды?
14) Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Var a,b,t,M,R:integer;
Function F(x:integer):integer;
Begin
F:= 2*x*x + 8*x + 10;
End;
BEGIN
a:=0; b:=10;
M:=a; R:=F(a);
for t:=a to b do begin
if (F(t)< R)then begin
M:=t;
R:=F(t);
End;
End;
Write(R);
END.
15) Сколько различных решений имеет система уравнений
(X1 Ù X2 Ù X3) Ú (X1 Ù X2 Ù X3) Ú (X1 Ù X2 Ù X3) = 1
(X2 Ù X3 Ù X4) Ú (X2 Ù X3 Ù X4) Ú (X2 Ù X3 Ù X4) = 1
...
(X7 Ù X8 Ù X9) Ú (X7 Ù X8 Ù X9) Ú (X7 Ù X8 Ù X9) = 1
где x1, x2, …, x9 – логические переменные? В ответе не нужно перечислять все различные наборы значений переменных, при которых выполнено данное равенство. В качестве ответа нужно указать количество таких наборов.
-1 |
А |
B |
C |
j |
M |
K |
F |
E |
L |
H |
F |
D |
-1 |
K |
C1) требовалось написать программу, которая вводит с клавиатуры координаты точки на плоскости (x, y – действительные числа) и определяет принадлежность точки заштрихованной области, включая ее границы. Программист торопился и написал программу неправильно. Вот она:
var x, y: real;
Begin
Дата добавления: 2015-08-18; просмотров: 64 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
Nike.mpeg | | | Readln(x, y); |