Напишите программу, вычисляющую сумму 3-х введенных с клавиатуры нечетных чисел.​

0Lvovich0 0Lvovich0    1   18.05.2020 14:23    0

Ответы
finicot finicot  24.08.2020 18:17

var a,b,c,s:integer;

begin

s:= 0;

readln(a);

readln(b);

readln(c);

if a mod 2 = 1 then begin

 s:= s + a;

 end;

if b mod 2 = 1 then begin

 s:= s + b;

end;

if c mod 2 = 1 then begin

 s:= s + c;

 end;

writeln('Сумма нечетных чисел = ', s)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика