1. Информатика
  2. Составьте программу, заменяющую

Составьте программу, заменяющую меньшее из двух данных чисел на среднее арифметическое этих чисел,а большее из двух данных чисел на среднюю этих чисел help ! please

viktoriakeda viktoriakeda    1   18.05.2019 03:40    1

Ответы
fedorinovkirs fedorinovkirs  11.06.2020 08:52

program lkcfndsl;

uses crt;

var a,b,s,g:real;

begin

clrscr;

readln(a,b);

s:=(a+b)/2;

g:=sqrt(a*b);

if a>b then a:=g else a:=s;

if b>a then b:=g else b:=s;

writeln(a,b);

readln;

end.

Надеюсь так понял.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
жангул1 жангул1  19.10.2020 08:33
Что относится к свойствам информации полнота источник актуальность доступность приёмное необходимость ввбириье 3 ответами сор по информации быстре до школы чма​...
ЛебедЪ ЛебедЪ  19.10.2020 08:33
Выбери информационные каналы: (выбери 2 правельных ответаa)звуковыеb)техничныеc)биологическиеd)техничныеe)бумажныеf)зрительное​...
smesh33221 smesh33221  19.10.2020 08:33
Как Вы считаете какого нужно создать робота Сумо, чтоб выиграть соревнование?...
tolstykh2005ow2t1s tolstykh2005ow2t1s  12.12.2021 21:34
1. Рассчитать дискретный канал связи без памяти: Задан входной и выходной алфавит канала связи Задано распределение вероятностей Px (x) над входным алфавитом: x x1 x2...
arinabolshakov1 arinabolshakov1  12.12.2021 21:33
Кто знает если купить подписку PS + на 12 месяцев Будет ли автоматически списываться деньги с карты при окончание подписки ?...
gamer2222 gamer2222  01.06.2019 07:40
Как составить блок-схему и программу, проверяющую, верно ли утверждение, что введенное вами целое число является четным....
Caxapok24 Caxapok24  01.06.2019 07:40
Вычислите логические операции , располагая их в порядке приоритета их выполнения не (b & не a ) - cvd...
olya363 olya363  01.06.2019 07:50
Написать функцию,сравнивающую две даты.функция должна возвращать(-1) если первая дата меньше второй ,0- если первая и вторая даты одинаковы и 1 -если первая дата больше...
gerasiko gerasiko  01.06.2019 07:50
:) 1. перевести числа из двоичной системы счисления в десятичную: а)11011110 б)1000010111 в)10010011010 г)11100010101 2. выполнить сложение,умножение, вычитание в двоичной...
FunGamer741 FunGamer741  01.06.2019 07:50
Дан алгоритм на языке грис: шаг шаг поворот поворот поворот шаг шаг прыжок прыжок прыжок шаг шаг поворот поворот поворот шаг шаг прыжок прыжок прыжок шаг шаг поворот...

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