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