Помогите пожалуйста составить программу верно!!!!!Вот условие:Даны два действительных

Question

Помогите пожалуйста составить программу верно!!!!!Вот условие:Даны два действительных

Помогите пожалуйста составить программку верно!!!!!
Вот условие:
Даны два реальных числа X и Y, не одинаковые друг другу. Заменить наименьшее из этих чисел половиной их суммы, а большее их двойным произведением. Программка обязана иметь дружеский интерфейс.

На Паскале

Задать свой вопрос

Чапко Тоха
Информатика
2019-09-12 23:44:39
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

составь предложение с 2 однородными подлежащими с союзом и

текст про велику втчизняну вйну 1 абзац з пiдкреслиними iмениками разом

Пожалуйста помогите Составьте словосочетания употребив глаголы с подходящими по смыслу

задача .покупали щуку,леща и окуня.Щука тяжелее леща,а лещ тяжелее окуня.какая рыба

как будет по английски бес 5 6 пол пятого пол девятого

РЕБЯТА СРОЧНО ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ ПОЖАЛУЙСТА!Через 4,4 г уксусного альдегида пропустили

Прочитайте. Письменно разберите любой глагол по составу и как часть речиНапишешь

Помогите пожалуйста очень надобно решить надобно обе

7 вопрос по тексту как патефон петушка от погибели спас

Помогите написать сочинение (вступление с проблемой, комментарий, позиция творца, собственное

Igor Kryshen · Answer 1 · 2019-09-12 23:54:04+3:00

Var x,y,t:real;
Begin
write('x = ');readln(x);
write('y = '); readln(y);
if xgt;y then
Begin
t:=y;
y:=(x+y)/2;
x:=x*t*2;
End
else
Begin
t:=x;
x:=(x+y)/2;
y:=x*t*2;
End;
writeln('X = ',x:0:2);
writeln('Y = ',y:0:2);
readln;
End.

О проекте

Помогите пожалуйста составить программу верно!!!!!Вот условие:Даны два действительных

Добро пожаловать!