3. дано натур. семизначное число p. вычислить сумму чётных цифр числа. вывести на экран последовательность из четных цифр числа. написать программу в паскале.
268
345
Ответы на вопрос:
Var p, sum: integer; posl: string; beginsum: =0; readln(p); while p> 0 do beginif p mod 10 mod 2=0 then beginsum: =sum+p mod 10; posl: =posl+' '+p mod 10; end; p: =p div 10; end; writeln(sum); writeln(posl); end.
Объяснение:
Средства связи – технические и программные средства, используемые для формирования, приема, обработки, хранения, передачи, доставки сообщений электросвязи или почтовых отправлений, а также иные технические и программные средства, используемые при оказании услуг связи или обеспечении функционирования сетей связи, включая технические системы и устройства с измерительными функциями.
Популярно: Информатика
-
2007arttt06.02.2021 21:16
-
яна176715.04.2022 21:09
-
каринка19525.03.2020 23:21
-
AltoДима23.04.2021 11:21
-
adeluka505.07.2021 12:52
-
sofia27supko27.08.2020 19:25
-
linassglazunov06.10.2020 21:41
-
eataev21.05.2020 09:19
-
itsnastyad07.04.2020 12:54
-
лаллах1229.06.2021 15:17