Ответы на вопрос:
Uses crt; var a,b: real; begin clrscr; write('введите два числа через пробел: '); read(a,b); if a*b> 0 then writeln('числа одного знака') else writeln('числа разных знаков'); readkey end.
Популярно: Информатика
-
yakovlevayaninaA10.09.2022 13:05
-
аня1118802.12.2022 10:28
-
Altry20.03.2020 02:48
-
lhukotunl19.02.2021 16:47
-
McКлей01.04.2022 10:40
-
Mtaraska30.12.2020 16:20
-
yuliandra13.04.2020 14:40
-
Sulifat16.08.2021 11:22
-
Maiss109.10.2020 14:26
-
melochek22828.11.2022 12:12