Предмет: Информатика,
автор: самуэлс
дано трёхзначное число. Определить: является ли сумма его цифр двузначным числом
Ответы
Автор ответа:
0
var a,s:integer;
Begin
read(a);
repeat
s:=s+a mod 10;
a:=a div 10
until a=10;
if (s<100) and (s>9) then write('Yes')
else write('No');
End.
Похожие вопросы
Предмет: Українська мова,
автор: vgggff
Предмет: Физика,
автор: Superarianka
Предмет: Информатика,
автор: Polina58334
Предмет: Математика,
автор: мпм
Предмет: История,
автор: komarova