Задача 2 урок 13.1
Primary tabs
Выведите на экран таблицу умножения используя только циклы вида while.
var i,a: integer; begin i:=1; while (i<=9) do begin a:=1; while (a<=9) do begin write(i*a,' '); a:=a+1; end; writeln(); i:=i+1; end; end.
- Log in to post comments
- 285 reads