Ответы на вопрос:
Var a,b: real; begin read(a,b); if a < > 0 then writeln('x = ', -b/a) else if b = 0 then writeln('any number') else writeln('no solutions') end.
Популярно: Информатика
-
Неизвестная6606.11.2021 06:30
-
Igor2001827.09.2020 00:23
-
M4xL1ght24.04.2023 14:27
-
ryzhovaelena112.08.2020 05:59
-
Миланахасик12.08.2022 04:50
-
Evilanda17.07.2022 15:03
-
kurnikova230.12.2022 09:18
-
18larina1810.06.2023 10:54
-
Riki00819.12.2021 18:59
-
fokusPrise25.05.2022 00:08