Написать программу в Pascal, определяющую, является - вопрос №119133234 от ВаняСуліма 22.04.2020 16:56

Question

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

ВаняСуліма · Answer

PascalABC.NET 3.5.1begin  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.Объяснение:...