Помогите плиз 25 баллов!
4)Сколько раз будет выполнен этот цикл?
i:=2;
while i<5 do begin
writeln('Привет!');
i:=i+1;
end;
5)Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза?
i:=...;
while i>=6 do begin
writeln('Привет!');
i:=i-1;
end;
6)Чему будет равно значение переменной «a» после выполнения этого цикла?
i:=3;
a:=12;
while i<3 do begin
a:=a+i;
i:=i+1;
end;
7)Сколько строк напечатает программа:
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.
4)Сколько раз будет выполнен этот цикл?
i:=2;
while i<5 do begin
writeln('Привет!');
i:=i+1;
end;
5)Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза?
i:=...;
while i>=6 do begin
writeln('Привет!');
i:=i-1;
end;
6)Чему будет равно значение переменной «a» после выполнения этого цикла?
i:=3;
a:=12;
while i<3 do begin
a:=a+i;
i:=i+1;
end;
7)Сколько строк напечатает программа:
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.
More Questions From This User See All