Ответы на вопрос:
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.
Популярно: Информатика
-
Dan4ik721109.03.2023 10:24
-
tsudakatyap0bt0w09.02.2022 00:27
-
Nikita453917.05.2021 04:37
-
miaghtp01fmq16.11.2022 12:34
-
Dirol343418.05.2022 07:07
-
JodiRimmet2713.09.2021 14:59
-
2103200822.09.2021 13:37
-
d0ruska10.05.2020 13:22
-
AloysiuS05.05.2022 21:46
-
zaret119.12.2022 04:42