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