Ответы на вопрос:
Program chisla; uses crt; var a,b,c,d : integer; begin writeln('введите трехзначное число: '); readln(a); if (a< 100) or (a> 999) then writeln('введено не трехзначное число') else begin b: =a div 100; c: =(a-(b*100)) div 10; d: =a-(b**10); writeln('сумма цифр этого числа равна ',b+c+d); end end.
Популярно: Информатика
-
vail1210.04.2022 11:15
-
Fosa124.06.2022 22:11
-
arturkill1230931.03.2021 06:45
-
mariapodgornova02.05.2021 08:29
-
Anny210703.02.2021 03:57
-
Alika1647923803.09.2022 15:41
-
КириллПос18.08.2021 01:56
-
dehezy25.03.2020 10:59
-
den1112pro02.11.2021 08:11
-
Danich114ejck01.08.2022 23:49