Предмет: Информатика,
автор: 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.
Объяснение:
Интересные вопросы
Предмет: Қазақ тiлi,
автор: Юличка97
Предмет: Русский язык,
автор: olgsobina
Предмет: Английский язык,
автор: Чупакабр
Предмет: Алгебра,
автор: Stiya
Предмет: Математика,
автор: maksimkavagin