Предмет: Информатика,
автор: 2011200413
напишите программу для проверки два из трех чисел кратны 7 паскаль
Ответы
Автор ответа:
1
var a, b, c: integer;
begin
Read(a, b, c);
Write(Ord(a mod 7 = 0) + Ord(b mod 7 = 0) + Ord(c mod 7 = 0) = 2)
end.
Интересные вопросы
Предмет: Химия,
автор: daralarionova930
Предмет: Математика,
автор: sava4311
Предмет: Русский язык,
автор: nenastoyaschaya8311
Предмет: Литература,
автор: lenka120