• Дана вещественная матрица размерности MxN. Найти сумму элементов матрицы расположенных в каждой строке с чётным номером. Решите в qbasic

Ответы 3

  • Спасибо конечно, но нужно в qbasic
    • Автор:

      potts
    • 6 лет назад
    • 0
  • ща
    • Автор:

      aprilneal
    • 6 лет назад
    • 0
  • Вроде это program Lab1_2;  const  n= 5; m=5;   var  a:array[1..n,1..m] of real;        s,i,j:integer;   begin   randomize;    for i:=1 to n do      begin        for j:=1 to m do          begin           a[i,j]:=random(10);           write(a[i,j]:4);          end;         writeln;      end;   s:=0;    for i:=1 to n do begin     for j:=1 to m do begin      if (a[i,j] mod 2) = 0 then begin       s:=s+a[i,j];      end;     end;      end;   writeln('summa: ',s);    readln; end.(если ошибся сори!)
    • Автор:

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

Войти через Google

или

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

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

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