39

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

03 марта 2023

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

категория: информатика



77

Program P1; Uses Crt; Var a, b, c: Real; BeginClrScr; Write ('Введи 2 диагонали через пробел: '); Readln (a, b); c: =sqrt (sqr (a / 2)+sqr (b / 2); Write ('Сторона ромба=', c: 0:5); Readln; End.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...