Информатика

Моисей

28 февраля, 18:52

Сколько раз будет выполнен этот цикл?

i:=2;

while i<5 do begin

writeln ('Привет!') ;

i:=i+1;

end;

Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза?

i: = ...;

while i>=6 do begin

writeln ('Привет!') ;

i:=i-1;

end;

Чему будет равно значение переменной "a" после выполнения этого цикла?

i:=3;

a:=12;

while i<3 do begin

a:=a+i;

i:=i+1;

end;

Сколько строк напечатает программа:

var k, l:integer;

begin

k:=8;

while k>0 do

begin

l:=10;

while l<15 do

begin

writeln ('Мне нравится Паскаль.') ;

l:=l+1;

end;

k:=k-1;

end;

end.