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

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.

думаю, что 19,5 кб = 0,019 мб.

var a: integer; beginreadln(a); write (a div 10); end.