Напишите программу, вычисляющую сумму 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.

программа на паскале:

program xxx;

      var a, b: real;

begin

  writeln('введите количество миль');

  readln(a);

  b: = a*1.6;

  writeln('кол-во киллометров - ',b)

end.

3*2=6128*512*6=393216ъ128+512=640640: 10=6464*6=384кб