Ответы на вопрос:
Var a,b: real; begin readln(a,b); if a=b then writeln('они равны') else if a> b then writeln(a,' больше ' ,b) else writeln(b,' больше ' ,a); end.
Популярно: Информатика
-
В первый день спортсмен пробежал X километров, а затем он каждый день увеличивал...
короваточкару03.01.2023 15:00 -
Реши задачу. Веселые человечки решили сходить в поход. Пончик испёк для всех...
maryrous22.04.2022 14:55 -
Припишите справа к данному числу число, составленное из тех же цифр, и данное....
eva27272727.08.2021 07:16 -
Информационный объем книги равен 202416 бит. Определите сколько символов содержит...
Эноа25.04.2021 18:16 -
решить это кр по информатике....
kamillagabbasoVa18.07.2022 02:37 -
8. Какая из данных программ на Паскале правильная: 1) var r: real; begin read(r);...
плщорршелит18.04.2021 06:55 -
Доказать переместительный закон для логического сложения....
тата27026.04.2023 15:38 -
Можете написать самомодуляция главное о компьютерных вирусах кратко и самое...
denismelnik0431.01.2023 01:03 -
Вставить вместо вопросов число. 2^18 бит = ? кбайт 4гб = ? байт 3072 мб =...
Емодзи16.01.2021 16:28 -
( Марат Джумагазиев. Стихотворение сем чудес света эПрочитай текст. Выбери...
reginaruzova108.04.2020 13:17