• Предмет: Информатика
  • Автор: minerandcopter
  • Вопрос задан 1 год назад

Написать программу в Pascal, определяющую, является ли 4-хзначное число, введенное с клавиатуры, кратным 5 и одновременно удовлетворяющим условию, что вторая цифра в его записи равна 2.

Ответы

Ответ дал: KnowsUser1
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.

Объяснение:

Похожие вопросы