Написать программу которая определит сумму всех цифр пятизначного числа x(вводятся с клавиатуры) и вывести на экран сообщение.и определить заканчивается эта сумма на 3,является ли эта сумма четным
300
500
Ответы на вопрос:
//pascalabc.net 3.2 begin var x: =readinteger ('введите x: '); var sum: =0; repeat sum+=x mod 10; x: =x div 10; until x=0; writeln ('сумма цифр: ', sum); writeln ('сумма заканчивается на 3: ', (sum mod 10)=3); writeln ('сумма четная - ', sum.iseven); end.
Популярно: Информатика
-
Andrey335510.01.2022 02:54
-
Сонька280804.02.2021 11:41
-
PolzoBatelb23.06.2020 22:57
-
jora200312308.04.2021 19:42
-
kazmerovichvika11.02.2023 01:13
-
manyna411.08.2022 11:31
-
Глеб070717.10.2020 01:50
-
PhoenixStep04.10.2020 07:32
-
Оля14276808.09.2021 09:19
-
СнежаночкаФил07.12.2022 20:57