Построить программу в Паскаль. "Дано трехзначное число. Определить, будет ли сумма его цифр больше 15." Пожалуйста!
Построить программу в Паскаль. "Дано трехзначное число. Определить, будет ли сумма его цифр больше 15." Пожалуйста!
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,c,d:integer; begin
read(d);
a:=d div 100;
b:= (d div 10) mod 10 ;
c:=d mod 10; if (a+b+c) >15 then
writeln('YES')
else
writeln('NO');
readln; end.
Не нашли ответ?
Похожие вопросы