Ответы
Ответ дал:
0
Ответ:
program z;
var a,b,c:integer;
begin
write ('Введите 3 числа: ');
read(a,b,c);
if ((a mod 2 = 0) and (b mod 2 = 0) and (c mod 2 = 0)) or ((a mod 2 <> 0) and (b mod 2 <> 0) and (c mod 2 <> 0)) then
write ('Да')
else write ('Нет')
end.
Похожие вопросы
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад