Задача 1 Урок 12.2
Primary tabs
Имеется программа:
var i: integer; begin for i:=5 to 34 do write(i, ' '); readln(); end.Ответьте на вопросы/выполните задания
Что в ней происходит?
Что будет на экране после её выполнения?
Перепишите её, используя цикл while.
Перепишите её, используя цикл repeat/until.
program U12_2Z1;
var i: integer;
begin
i:=5;
while (i<=34) do
begin
write(i, ' ');
i:=i+1;
end;
readln();
end. program U12_2Z1;
var i: integer;
begin
i:=5;
repeat
write(i, ' ');
i:=i+1
until (i>34);
readln();
end. - Log in to post comments
- 813 reads