Напишите программу на Паскале для решения следующей задачи. Даны два числа A и B, которые не равны друг другу. Большее из этих чисел нужно заменить половиной разности этих двух чисел, а меньшее — их удвоенным произведением. Значения A и B задать самостоятельно с клавиатуры. На проверку нужно прислать скриншот окна программы на Паскале с результатом работы очень надо
lauraumirzhan55
1
27.01.2021 20:11
3
Другие вопросы по теме Информатика
Ilyasha311
21.12.2020 18:28
anel3103
21.12.2020 18:28
AlisaSerikh
07.07.2019 21:30
Maxguvci
07.07.2019 21:30
Убийца967
16.04.2020 07:37
Алина11566
01.10.2019 12:10
valeralch
16.07.2019 18:40
Популярные вопросы
- Переведите текст ! , 1 традиции проявляются в сдержанности как знак...
2 - После прокаливания 2.32 г магния гидроксида масса твердого остатка...
2 - В6,5 кг свинины содержися 2,6 кг жиров. сколько жиров содержится в...
1 - Длина отрезка ab = 15.найдите координату его правого конца b, если...
2 - Периметр параллелограмма abcd, описанного около окружности, равен 40....
1 - Определить части речи данных слов.подчеркнет в каждой группе слов лишнее...
1 - Вычисли число атомов кислорода в веществах: 2koh+h2so3....
2 - 2.узнай у взрослых, из семейного архива, есть ли в твоец семье ветераны...
3 - Написать программу которая будет вводить на экран фамилию, имя, класс....
1 - Выписано три последовательных члена арифметической прогрессии 8; a;...
1
##
var (a, b) := ReadReal2;
if a > b then
Swap(a, b);
(a, b) := (2 * a * b, (a - b) / 2);
Print(a, b)