Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 02.06.2018
Сообщений: 1

Составить программу, вычисляющую все углы равнобедерной трапеции

02.06.2018, 17:53. Показов 1282. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
составить программу вычисляющую все углы равнобедерной трапеции, все стороны трапеции ведётся пользователем. за ранее спасибо
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
02.06.2018, 17:53
Ответы с готовыми решениями:

Составить программу калькулятор, вычисляющую все простейшие арифметические действия
1. Составить программу калькулятор, вычисляющую все простейшие арифметические действия 2. Даны два действительных положительных числа....

Составить программу, вычисляющую сумму
Дано натуральное число н(<100).Составить программу, вычисляющую сумму C:=sqr(н)/(1*2) + sqr(н)/(2*3*4)+ sqr(н)/(3*4*5*6)+…...

составить программу вычисляющую следующее выражение A=2*B+5*(C+D)
Задание: Составить программу, вычисляющую следующее выражение A=2*B+5*(C+D), где B,C,D-квадратные матрицы размером (n*n). Ввод элементов...

1
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
02.06.2018, 18:17
Лучший ответ Сообщение было отмечено PicBoss как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var a,b,c,h,x,u1,u2:real;
begin
repeat
writeln('Введите большее и меньшее основания трапеции 0<b<a');
readln(a,b);
until (b>0) and(a>b);
repeat
write('Введите длину боковой стороны c>0 c=');
readln(c);
until c>0;
x:=(a-b)/2;
h:=sqrt(c*c+x*x);
u1:=arctan(h/x)*180/pi;
u2:=180-u1;
writeln('Углы при большем основании=',u1:0:2,#0176);
writeln('Углы при меньшем основании=',u2:0:2,#0176)
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
02.06.2018, 18:17
Помогаю со студенческими работами здесь

составить программу вычисляющую делится ли натуральное число на 3
В общем надо составить программу вычисляющую делится ли натуральное число на 3 по признаку делимости.

Составить программу, вычисляющую сумму двух чисел
Составить программу вычисляющую сумму двух чисел. Завершение программы при нажатии на цифру 1. Помогите решить плиз через оператор цикла.

Составить программу, вычисляющую количество мм в банках сока
Вот условие: Начальное решение я составил: var e: array of integer; k: array of integer; n,i:integer; begin

Составить программу, вычисляющую сумму членов арифметической прогрессии
1) Найти сумму K членов последовательности: -2,3,8,13,... 2) Вычислить произведение членов последовательности -2,2,6,10,...не...

Составить программу вычисляющую куб максимального элемента в массиве
Привет, у меня тут дилемма . Изучаю паскаль в 9 классе. Дали задание - &quot;Составить программу вычисляющую куб максимального элемента в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru