Задача 8 Урок 13.1
Primary tabs
http://fkn.ktu10.com/?q=node/8697
Выведете на экран числа от 1 до 5 два раза с помощью вложенных циклов. Так чтобы в консоли было:
1 2 3 4 5
1 2 3 4 5
var a,b,i: integer; begin while a<2 do begin i:=1; for b:=1 to 5 do write (b,' '); writeln(); a:=a+1; end; end.
- Log in to post comments
- 324 reads