Дано двузначное число, определить в нём сумму цифр

sonyaponchic sonyaponchic    2   01.09.2019 22:40    1

Ответы
artikiv2006 artikiv2006  06.10.2020 10:35
Var 
x,s:integer;

begin
readln(x);
s:=0;
s:=x div 10+x mod 10;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Пени67 Пени67  06.10.2020 10:35
Program summ;
var x,s:integer;
begin
read(x);
s:=x div 10+x mod 10;
write(s);
end.

Например, вводим число 49, в ответе получаем s=13.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика