<span>var a,s:integer;
begin
write('a = ');
readln(a);
s:=(a div 10)+(a mod 10);
writeln('s = ',s);
end<span>.
Пример:
</span><span>a = 25
s = 7</span></span>
Кбайт больше потому что 1
247,128,346,427...выбирай любое.
Программное обеспечение- это то, что делает компьютеры универсальными, позволяя использовать типовую вычислительную машину для решения самых разнообразных задач.