var i,a,z:integer;
begin
for i:=1 to 5 do
begin
read(z);
if not( z mod 2 = 0) then a:=a+z;
end;
write('sum=',a);
end.
<span>электронный процессор,драйверы устройств</span>
Векторная графика
coreldraw
ilustator
Var n,a,b,s:integer;
begin
read(n1);
a:=n1 div 10;
b:=n1 mod 10;
s:=a+b;
n:=10*b+a;
writeln(s);
writeln(n);
end.
насколько я поняла тут основываются на количестве слогов в слове
:112331