Задать вопрос
ИнформатикаИнформатика
17 декабря, 00:43

Вычислить количество четных элементов ниже главной диагонали. Помогите

+2
Ответы (1)
  1. 17 декабря, 01:54
    0
    Var i, j, n, x, kol:int64;

    begin

    read (n) ;

    for i:=1 to n do begin

    for j:=1 to n do begin

    read (x) ;

    if (i>j) and ((x mod 2) = 0) then inc (kol) ;

    end;

    end;

    writeln (kol) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Вычислить количество четных элементов ниже главной диагонали. Помогите ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » Вычислить количество четных элементов ниже главной диагонали. Помогите
Регистрация Забыл пароль