Ответы
Ответ дал:
0
program fgh;
var i, s, n, a:integer;
begin
s:=0;
writeln('введите 10 чисел');
for i:= 1 to 10 do
begin
readln(a);
if a mod 2 <> 0 then
s:=s+a;
end;
writeln('сумма= ', s);
end.
Вас заинтересует
1 год назад
2 года назад
7 лет назад
7 лет назад
8 лет назад