Задать вопрос
28 декабря, 18:38

Заполнить двумерный массив 5*5 случайными числами.

найти суммы нечетных элементов (значение элементов)

+1
Ответы (1)
  1. 28 декабря, 18:53
    0
    Вот пример программы:

    uses Crt;

    const N=5;

    type Mas=array [1 ... N, 1 ... N] of integer;

    var i, j, Sum: integer;

    A: Mas;

    begin

    ClrScr;

    Sum:=0;

    for i:=1 to N do

    for j:=1 to N do

    A[i, j]:=10+random (90) ;

    for i:=1 to N do

    for j:=1 to N do

    if (A[i, j] mod 20) then Sum:=Sum+A[i, j];

    for i:=1 to N do

    begin

    for j:=1 to N do

    Write (A[i, j]:4) ;

    WriteLn;

    end;

    WriteLn;

    WriteLn (' S = ', Sum) ;

    ReadLn;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Заполнить двумерный массив 5*5 случайными числами. найти суммы нечетных элементов (значение элементов) ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы