Циклы
Вариант 1.

1. Чему будет равно значение переменной a после выполнения приведенного фрагмента программы?
a := 0;
for i:=5 downto 3 do begin
a := a + 3;
end;
Ответ: 
2. Сколько раз выполнится этот цикл:
for i:=1 downto 4 do begin
...
end;
Ответ: 
3. Чему будет равно значение целой переменной a после выполнения этого фрагмента программы?
a:=10;
for i:=1 to 2 do begin
a:=a-1;
end;

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

Ответ: 
5. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 3 раза?
i:=4;
repeat
writeln('Привет!');
i:=i+1;
until i=...;
Ответ: 
6. Сколько раз будет выполнен этот цикл?
i:=2;
repeat
writeln('Привет!');
i:=i+1;
until i > 5;
Ответ: 
7. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 4 раза?
i:=6;
while i<=... do begin
writeln('Привет!');
i:=i+1;
end;
Ответ: 
8. Сколько раз будет выполнен этот цикл?
i:=2;
while i<5 do begin
writeln('Привет!');
i:=i+1;
end;
Ответ: