Задание №1
Какое число будет выведено на экран после выполнения этого фрагмента
программы?
write(1);
for i:=3 to 5 do
write(i);

Задание №2
Какое число будет выведено на экран после выполнения этого фрагмента
программы?
write(4);
for i:=3 downto 1 do
write(2*i);

Задание №3
Чему будет равно значение целой переменной a после выполнения этого
фрагмента программы?
a:=10;
for i:=1 to 2 do begin
a:=a-2;
end;

Задание №4
Определите, что будет напечатано в результате работы следующей
программы.
Var k, і: integer;
Begin
k:= 4;
For і:= 1 to 3 do
k:= 2*k + і;
Writeln(k);
End.

inkognit1234567    3   22.12.2020 21:24    60