Ответы на вопрос:
Var a,b,c,d,x: integer; begin x: =1234; a: =x mod 10; b: =((x mod 100) div 10); c: =((x mod 1000) div 100); d: =x div 1000; x: =a+b+c+d; writeln (x); end.
Популярно: Информатика
-
yanazaharova9625.04.2021 13:17
-
46hitman4617.03.2023 06:18
-
alekseysidorov23.03.2023 02:53
-
partypoison601.01.2021 04:46
-
gora1511v26.08.2022 15:17
-
777kicigina26.10.2022 07:37
-
Yalikhan24.05.2021 01:58
-
yevdokimenkoal05.03.2021 18:20
-
tanya20052513.02.2023 02:20
-
syav197904.06.2022 11:35