• (pascal) Заполнить квадратную матрицу А[5,5]
    1 2 3 4 5
    2 3 4 5 0
    3 4 5 0 0
    4 5 0 0 0
    5 0 0 0 0

Ответы 1

  • vari,j:Integer;A:Array[1..5,1..5] of Integer;Begin for i:=1 to 5 do  for j:=1 to 5 do   Read(A[i,j]); Writeln('Массив 5х5 успешно заполнен');end.
    • Автор:

      amelie
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years