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.
<span>0.125
влывлыаываыварпарпапрапр</span>
Я считаю,что она нужна для того,чтобы запоминать все программы,действия,файлы. Чтобы помнить всё,что нужно для нас. Если помогло,то может добавьтесь ко мне в друзья?
Например, так: по три напротив каждой стороны и два по противоположным углам.