Задача 1 урок 12.1
Primary tabs
Выведите на экран, все числа от 55 до 9236.
program zadacha1;
var i: integer;
begin
i := 55;
repeat
write(i, ' ');
i := i + 1;
until (i>9236);
readln();
end. - Log in to post comments
- 991 reads
Выведите на экран, все числа от 55 до 9236.
program zadacha1;
var i: integer;
begin
i := 55;
repeat
write(i, ' ');
i := i + 1;
until (i>9236);
readln();
end.