profile
Опубликовано 4 года назад по предмету Информатика от laksloks

Написать программу, которая определяет количество четных чисел из введенной с клавиатуры последовательности N чисел. Написать программу на Паскале.

  1. Ответ
    Ответ дан leon123
    Например если вводится 3 числа

    var a,b,c,x:integer;
    begin
    x:=0;
    Read(a,b,c);
    if a mod 2=0 then x:=x+1
    if b mod 2=0 then x:=x+1;
    if c mod 2=0 then x:=x+1;
    Writeln('Chetnuh chisel =' ,x);
    end.
Самые новые вопросы