Задача 9 урок 13.1
Primary tabs
M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
1......N
1......N}M раз
program zadacha9; var i, j, m, n: integer; begin writeln('Vvedite kollichestvo strok:'); readln(m); writeln('Vvedite kollichestvo simvolov:'); readln(n); i:=1; while i <= m do begin j:=1; while j <= n do begin write(j,' '); j:=j+1; end; writeln(); i:=i+1; end; readln(); end.
- Log in to post comments
- 525 reads