Ответы на вопрос:
Program z1; var x, y: integer; max, min: real; begin readln(x, y); max : = 0; min : = 0; if x > y then begin max : = x / y; min : = x mod y; writeln(max, ' ', min); end; if x < y then begin min : = x / y; max : = x mod y; writeln(max, ' ', min); end; end.
Популярно: Информатика
-
ббэшка06.09.2022 15:08
-
Kisonka1420.07.2021 02:01
-
abereziuk201705.05.2023 02:13
-
para65627.10.2020 07:18
-
Бегимотик00227.06.2022 16:00
-
Karina12133427.03.2021 07:36
-
vddrobysheva23.09.2022 18:06
-
miraklim77704.05.2020 18:37
-
danilpus201627.04.2023 00:50
-
lolko227.10.2021 04:52