Ответы на вопрос:
Var a,b: integer; begin write('введите a: '); readln(a); write('введите b: '); readln(b); if a< > b then writeln((b+2*a)/b) else writeln(a,' = ',b); end.
Популярно: Информатика
-
2291619.12.2020 11:27
-
Angeloc256708.09.2022 12:46
-
Ninell9809.03.2021 21:54
-
dilnuscha08.04.2022 03:52
-
angelok20033219.06.2021 06:58
-
Misha4545618.02.2022 01:21
-
doglove9616.04.2023 15:39
-
393737282929.12.2022 16:59
-
Сашунязайка16.10.2022 00:56
-
рооллбббб25.09.2021 07:12