Напишите программу, в которой даны три целых числа. Если их сумма
является нечетным числом, вывести ее и сообщение «Задача решена», в
противном случае – «Нет решения».
219
476
Ответы на вопрос:
var а, b, c,i:integer;
begin
readln(a); readln (b); readln (c);
for I:=1 to 4 do
if sum:=a+b+c mod 2 =1 then writeln(sum, ' Задача решена') else writeln(' Нет решения')
end.
Популярно: Информатика
-
dashasokolova2106.05.2022 01:13
-
kristinakarpen02.06.2020 11:32
-
rebrot4014.06.2022 20:47
-
tukva8315.07.2020 00:11
-
Даниил1234566623.01.2021 11:56
-
veronika12141631.07.2022 14:19
-
filimonovajulia108.04.2020 03:35
-
smit007agent20.09.2022 20:24
-
ssdjpiffi17.04.2023 01:41
-
nastyak1211924.10.2020 02:36