Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
K&F так как & - знак логического умножения.
ш, с, в (о-дин, д-ва, т-ри, ч-етыре, п-ять, ш-есть, с-емь, в-
решение на языке 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.
Популярные вопросы