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