Дано трёхзначное число. определить: является ли - вопрос №122811 от pachev 20.12.2021 00:29

Question

Информатика: Дано трёхзначное число. определить: является ли сумма его цифр двузначным числом

pachev · Answer

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....