• дан двумерный массив заданный случайным образом размером 3*5. Вывести сформированный массив и найти максимальную сумму среди сумм столбцов

Ответы 1

  • vara:array [1..5,1..3] of integer;b:array[1..5] of integer;x,y,i,n,max:integer;Begini:=1;randomize;for x:=1 to 5 do for y:=1 to 3 do a[x,y]:=random(10); for x:=1 to 5 do Begin  for y:=1 to 3 do  write(a[x,y],' ');  writeln;  End; for y:=1 to 3 do Begin  for x:=1 to 5 do  b[i]:=b[i]+a[x,y];  i:=i+1;  End; for i:=1 to 3 do if b[i]>max then max:=b[i]; writeln(max);End.
    • Автор:

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

Войти через Google

или

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

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

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