Ответы на вопрос:
Var x,a,b,c: integer; begin write('введите число: '); read(x); a: =x div 100; b: =x div 10 mod 10; c: =x mod 10; writeln('сумма цифр: ',a+b+c); end.
Популярно: Информатика
-
гулинахабирова02.03.2021 18:27
-
NastenkaDrow08.11.2020 16:14
-
dashasokolova2127.05.2023 10:13
-
Vladislava11111111114.12.2020 12:57
-
justnero09.05.2022 09:58
-
kapov2017p0aak601.08.2020 02:12
-
leomessi132114.11.2022 19:47
-
сабинаааа19.11.2021 04:29
-
ruslan563210.02.2022 01:26
-
trikozatatjana106.04.2023 21:42