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

запишите алгоритм определения количества четных чисел среди заданных целых чисел а,в,с

  1. Ответ
    Ответ дан glebglebgleb

    var
    a,b,c,n:integer;
    begin
    n:=0;
    readln(a);
    readln(b);
    readln(c);
    if (a mod 2)=0 then
    n:=n+1;
    if (b mod 2)=0 then
    n:=n+1;
    if (c mod 2)=0 then
    n:=n+1;
    writeln('kolichestvo= ', n);
    end.

Самые новые вопросы