• напишите программу увеличивающую каждый элемент матрицы (n,m) в 3 раза и сохраняющую результат в виде второй матрицы

Ответы 2

  • program mr;var i,j,n,m,g: byte;a,b: array[1..10,1..10] of integer;beginwriteln('Введите размер массива n<10 и m<10 :');Read(n,m);writeln('Заполняем матрицу : ');for i:=1 to n do for j:=1 to m do begin Read(a[i,j]); b[i,j]:=1; for g:=0 to 2 do b[i,j]*=a[i,j]; end; writeln('');for i:=1 to n dofor j:=1 to m do writeln('м1 : ',a[i,j], ' м2 : ',b[i,j]);end.
    • Автор:

      dummy
    • 6 лет назад
    • 0
  • for g:=0 to 2 do b[i,j]*=a[i,j]; после квадратных скобок точно верно??? пишет что какое действие должно быть
    • Автор:

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

Войти через Google

или

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

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

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