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


дано трехзначное число N. определить будет ли сумма его цифр четным числом

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

    Решение на языке Pascal

    program pr;

    var n,a,b,c, sum:integer;

    begin

    readln (n);

    a:=n div 100;

    b:=n mod 100 div 10

    c:=n mod 10

    sum:=a+b+c;

    if  sum mod 2 = 0 then writeln ('Сумма цифр четная') else writeln('Сумма цифр четная');

    readln;

    end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц