Задать вопрос
14 июля, 22:39

Напишите программу на паскале, которая

определяет числа в последовательности заканчивающиеся на 4 и кратные 6.

+4
Ответы (1)
  1. 15 июля, 01:01
    0
    var

    k, i, n, x: integer;

    begin

    readln (n) ;

    k : = 0;

    for i : = 1 to n do

    begin

    readln (x) ;

    if (x mod 10 = 4) and (x mod 6 = 0) then

    k : = k+1;

    end;

    writeln (k) ;

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