< >

помогите пожалуйста! составить программу вычисляющую сторону ромба если известны 2 диагонали?

Ответы

Ответ дал: max705
0

Program P1;
Uses Crt;
Var a, b, c : Real;

Begin
ClrScr;
Write('Введи 2 диагонали через пробел: ');
Readln(a, b);
c := sqrt(sqr(a / 2) + sqr(b / 2));
Write('Сторона ромба = ', c : 0 : 5);

Readln;
End.

Похожие вопросы
Русский язык
2 года назад
Проверочное слово ученик
Русский язык
2 года назад
поставь данные сущ в предложный  падеж.  с разными предлогами и состав сними предложения простые и сложные      вот слова.       письмо      дождь   весна     молоко     роса      падеж
Математика
7 лет назад
Сократите дроби:20,25;36,72;105,30
Биология
7 лет назад
Пожалуйста помогите с 3 номером!!! 20 баллов
Математика
10 лет назад
сколько цифр содержит запись наименьшего натурального числа, которое делится на 225 и записывается только единицами и нулями
Биология
10 лет назад
1) способ размножения,не требующий образования гамет 2) образование гамет необходимо при 3) размножение корнями,клубнями,черенками,усами,отводками 4)бесполый способ размножения одноклеточных эукариот
Математика
10 лет назад
В туристический поход на 7 дней отправляется группа из 8 человек. В походе на одного человека приходится 90 грамм сахара в день. Сколько трехкилограммовых мешков сахара нужно купить, чтобы сахара
Химия
10 лет назад
маса фенола 4.7г і взаємодіє з розчином калій гідроксиду масою 120г з масовою часткою лугу 14%.знайти масу феноляту. CРОЧНО ПЛИЗЗЗ помогите!!!((( решается годовая оценка.