Урок 13.1 Задача 9

Primary tabs

Submitted by kuznmax on Sun, 06/12/2022 - 18:09

Forums:

Урок 13.1 Задача 9

M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
1... N}M
1... N}M
Решение:

var m, n, i, j : integer;
begin
  writeln('Введите число  M');
  readln(m);
  writeln('Введите число N');
  readln(n);
  for i := 1 to m do
    begin
      for j := 1 to n do
        write(j, ' ' );
        writeln();
    end;
  readln();
end.
  • Log in to post comments
  • 1453 reads
vedro-compota's picture

vedro-compota

Tue, 06/21/2022 - 20:28

решение нормальное, исправить форматирование

_____________
матфак вгу и остальная классика =)

kuznmax

Tue, 06/28/2022 - 15:52 

var m, n, i, j : integer;
begin
  writeln('Введите число  M');
  readln(m);
  writeln('Введите число N');
  readln(n);
  for i := 1 to m do
    begin
      for j := 1 to n do
        write(j, ' ' );
      writeln();
    end;
  readln();
end.
vedro-compota's picture

vedro-compota

Tue, 07/05/2022 - 20:05

засчитано

_____________
матфак вгу и остальная классика =)