16. Определите значение переменой b после выполнения алгоритма:
a := 3
b := 18
a := b - a * 3
b := 4+a*4
17. Чему будет равно значение переменной Х после выполнения программы:
Program Chislo;
var X:integer;
begin
X:= 3;
if (X>1)
then X:= 2
else X:= 0;
write (X);
end.
18. Чему будет равно значение переменной Х после выполнения фрагмента программы:
X:= -2;
if (X>0)
then X:= 1;
write (X);
19.Чему равно значение переменной В после выполнения фрагмента программы:
А:= 5;
case А of
1: В:=2;
2: В:=4;
3: В:=6;
else В:=0;
end;
20. Чему равно значение переменной N после выполнения фрагмента программы:
N:=0;
S:=0;
while (S<3) do
begin
N:=N+1;
S:=S+N;
end;
write (N);