1. Информатика
  2. Впрограмме паскаль, написать

Впрограмме паскаль, написать программу, которая сравнивает два действительных числа x, y. если x больше чем y находит их сумму, а произведение если это не так.

Hitroymnik Hitroymnik    2   08.10.2019 02:30    0

Ответы
marisina marisina  10.10.2020 03:11

Program n_1;

var x,y:double;

begin

   read(x,y);

   if x>y then x:=x+y

   else x:=x*y;

   writeln(x:0:10);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Доминика671554 Доминика671554  17.12.2019 15:17
[tex]3 x - 4y 0[/tex]если оношение задано следующим неравенством, то данному отношению принадлежит следующая пара чисел.​...
wwwshev24 wwwshev24  17.12.2019 15:18
Запиши число 13533 в развёрнутом виде, начиная со старшего разряда...
olyaolya22 olyaolya22  17.12.2019 15:20
Скорость передачи данных 9200 бит/с. за сколько времени можно передать текст объёмом 1500 байт? ​...
rf2048111111ozt4z7 rf2048111111ozt4z7  17.12.2019 15:22
37 ! составить программу на pascal. условие: даны три стороны треугольника. вычислите площадь и периметр. ход решения: ввести три цифры - стороны треугольника и с форум нахождения...
Lngtnk5 Lngtnk5  17.12.2019 15:22
Синтезировать кодопреобразователь из 8-4-2-1 в 6-4-2-1​...
вау1905 вау1905  17.12.2019 15:29
Вариант 4найдите х, если 16 битов = 32 мбайт2. диск имеет объем 700 мб и весит 25 г. сколько бы весил набор дисков,необходимый для копирования информации с жесткого диска объемом...
суперМозг777 суперМозг777  17.12.2019 15:30
Дано 3 цифрове число, визначити чи сума кубів визначити чи утворює сума кубів цифр цього числа не парне число p.s (c++) треба план і сам в с++...
Гульдана111 Гульдана111  17.12.2019 15:32
Создать программу для решения ....
bbll1998 bbll1998  17.12.2019 13:51
Написать программу на turbo pascal 9 класс напишите программу: подсчитать количество нулей в массиве, состоящем из n целых чисел. элементы массива задавать вручную....
Style55 Style55  17.12.2019 13:53
1. у исполнителя бета две команды, которым присвоены номера: 1. прибавь 2; 2. умножь на b(b — неизвестное натуральное число; b ≥ 2).выполняя первую из них, бета увеличивает...

Популярные вопросы