1. Информатика
  2. Задана сторона равностороннего

Задана сторона равностороннего треугольника и квадрата . Оставьте программу, с которой определите , что больше площадь треугольника или площадь квадрата​

PolinaSlesareva PolinaSlesareva    2   02.03.2020 22:15    0

Ответы
Bksd Bksd  11.10.2020 17:15

var

a,b,p:real;

begin

read(a,b);

p:=3*a/2;

if sqrt(p*(p-a)*sqr(p-a))>sqr(b) then

write('Площадь треугольника больше',)

else

if sqrt(p*(p-a)*sqr(p-a))<sqr(b) then

write('Площадь треугольника меньше',)

else

write('Площади равны(что маловероятно)')

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
katerinamorozo2 katerinamorozo2  23.09.2019 02:20
Дан массив из 10 целых чисел в диапазоне [-10000,10000]. определите количество чисел, оканчивающихся на 2. числа вводятся с клавиатуры! написать в паскале)...
mops123321 mops123321  23.09.2019 08:10
С# работа начальный вклад в банке равен 100 000 тг. через каждый месяц размер вклада увеличивается на p процентов от имеющейся суммы. по данному p определить, через сколько месяцев...
истина4 истина4  23.09.2019 08:10
С# работа 1. пользователь вводит имя. в ответ вернуть (вывести на экран) строку «, …(введенное пользователем имя)». 2. пользователь вводит строку. проверить, является ли эта строка...
ГульшатГайипова2006 ГульшатГайипова2006  23.09.2019 08:10
Решите, , две . язык программирования: pascalabc.net. с клавиатуры вводятся два числа. вывести на экран меньшее из них. если числа равны, вывести «равны» с клавиатуры вводятся два...
hedaku hedaku  05.06.2019 16:10
Даны три вещественных числа x, y, z. вычислить значения выражений x +y+z и xyz и вывести максимальное из них...
Соня2340 Соня2340  23.05.2019 17:30
1. текст составлен с использованием алфавита мощностью 64 символа и содержит 100 символов . каков информационный объем текста? 2.информационный объем текста , подготовленного с...
oksanalap1 oksanalap1  23.05.2019 17:20
Вывести на экран turbo pascal для заданного натурального числа n 1)найти сумму всех делителей, кратных хотя бы одному из целых чисел c или d 2)найти среднее арифметическое всех...
milka1951 milka1951  04.10.2019 01:30
Поради батька синові в вірші якщо кіплінга...
voronvoron2002 voronvoron2002  04.10.2019 01:30
Найдите неизвестные число а) а * 7 =0,28 б) 5 - а =3,8...
PYURAN PYURAN  04.10.2019 01:30
Марійка задумала двоцифрове число . потім вона до цього числа додала суму його цифр і отримала друге число . з другим числом вона зробила те ж саме ( додала до нього суму його цифр...

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