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