Предмет: Информатика,
автор: minerandcopter
Написать программу в Pascal, определяющую, является ли 4-хзначное число, введенное с клавиатуры, кратным 5 и одновременно удовлетворяющим условию, что вторая цифра в его записи равна 2.
Ответы
Автор ответа:
1
Ответ:
PascalABC.NET 3.5.1
begin
var N := ReadInteger();
var sec_char := char.GetNumericValue(N.ToString[2]);
if ((N mod 5 = 0) and (round(sec_char) = 2)) then Println('Yes') else Println('No');
end.
Объяснение:
Похожие вопросы
Предмет: Русский язык,
автор: May25
Предмет: Русский язык,
автор: pypok2005
Предмет: Русский язык,
автор: botazhan98
Предмет: Литература,
автор: Ольга280280
Предмет: Биология,
автор: annamikhaylik