Выяснить, является ли число Y кратным
3 и больше 50? Если условие выполняется, то вывести да, иначе нет
Program
VAR __: real;
Begin
Weiteln (‘введите число х’);
Reagln (__);
If __ And (Y mod 3=0) then writeln (‘___’) Else writeln (‘____’);
End.
112
414
Ответы на вопрос:
Популярно: Математика
-
pro100skill13213.02.2020 15:20
-
Рита737319.08.2021 01:16
-
xhhxjdjdj408.02.2022 13:33
-
okfuh08.03.2021 22:11
-
lolkajoin22.04.2020 01:12
-
Андрей193536282507.01.2022 17:04
-
mlphappyme09.04.2023 08:20
-
shebkoch11.03.2023 10:03
-
Лтвет26.09.2022 18:57
-
Koul63711.10.2021 11:35