Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Найти первый член y https://www.cyberforum.ru/ turbo-pascal/ thread760623.html
Turbo Pascal Описать, используя структуру записи, информацию в больничной базе данных о стационарных больных
Добрый вечер! помогите пожалуйста с задачей в Паскале. у самой не получается. Буду вам очень благодарна! Описать, используя структуру записи, информацию в больничной базе данных о стационарных больных: ФИО, возраст, дата поступления, диагноз. Составить программу, осуществляющую ввод данных о каждом больном, определяющего старшего больного и больных лежащих в больнице более 15 дней.
Turbo Pascal Второй отрицательный элемент заменить минимальным https://www.cyberforum.ru/ turbo-pascal/ thread760619.html
Создать и вывести массив -у- с элементами где yk=fi+10(r) где i=3, k=1..12 . Второй отрицательный элемент заменить минимальным
Turbo Pascal Ввести в массив седловую точку и получить результат Ввести в массив седловую точку и получить результат.. Var R: Array Of Integer; I, J, C, MaxS, IMin, Ex: Integer; Begin WriteLn('Матрица:'); For J:= 1 To 9 Do Begin For I:= 1 To 9 Do Begin R:= Integer(Random(10)); Write(R, ' '); https://www.cyberforum.ru/ turbo-pascal/ thread760596.html
Turbo Pascal Составить процедуру преобразующую последовательность
Пусть даны вещественные числа a1..a20. Составьте процедуру, преобразующую эту последовательность по правилу: большее из ai и ai+10 (i=1..10) принять в качестве нового значения ai, меньшее – в качестве нового значения ai+10.
Turbo Pascal Программа подсчета букв L https://www.cyberforum.ru/ turbo-pascal/ thread760483.html
Написать программу подсчета букв "L" в первом рядке и знаков "+" во втором. Помогите пожалуйста, срочно нужно!
Turbo Pascal Напечатать квадрат той из матриц, в которой меньший след Дано две квадрадические матрицы 3*3. Напечатать квадрат той из них, в которой меньший след(сума диагональных элементов) Написал, но она не работает... Исправьте пожалуйста program 1111; type arr=array of integer; var i,j,Sa,Sb:integer; a,b:arr; function sled(a:array of integer): integer; begin sled:=a+a+1+a+a; end; begin https://www.cyberforum.ru/ turbo-pascal/ thread760480.html Модуль GRAPH: Составьте программу вывода на экран стилизованного изображения велосипедиста Turbo Pascal
Составьте программу вывода на экран стилизованного изображения велосипедиста. При нажатии клавиши Enter он начинает движение, вращая ногами педали
Turbo Pascal Модуль: Разработать подпрограмму определения количества нулевых элементов матрицы Добрый день! Помогите пожалуйста написать программу с помощью модуля,процедуры и функции соответственно.Текст задачи: Разработать подпрограмму определения количества нулевых элементов матрицы А(KxM). K=5; M=3. Вот данная программа без модуля каким образом ее изменить? program LR8; const k=5; m=3; https://www.cyberforum.ru/ turbo-pascal/ thread760380.html Turbo Pascal Получить Все натуральные числа меньше n, квадрат суммы цифр которых равен m https://www.cyberforum.ru/ turbo-pascal/ thread760357.html
Даны натуральные числа n,m. Получить Все натуральные числа меньше n, квадрат суммы цифр которых равен m.
Получить наименьшее N, при котором неравенство 3n^3-730>0 истинно Turbo Pascal
Получить наименьшее натуральное число N, при котором неравенство 3n^3-730>0 истинно.
Turbo Pascal Задача на Бесконечную Р-ичную периодическую дробь Задание: Бесконечную Р-ичную периодическую дробь (1<Р<10), заданную в виде непериодической части и периода, перевести в десятичную систему счисления, выделив непериодическую часть и период у результата. У меня получилась программа: uses CRT; const a: string = '012345678'; {задаём строку для поиска в ней символов} var https://www.cyberforum.ru/ turbo-pascal/ thread760302.html
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
13.01.2013, 18:44 0

Вычислить площадь прямоугольника по диагонали и углу между диагональю и большей стороной - Turbo Pascal - Ответ 3995803

13.01.2013, 18:44. Показов 7150. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено kamaletdinov как решение

Решение

Да нет здесь никакого условного оператора, это линейный алгоритм.
А чтобы решить эту задачу нужно было в школу ходить и геометрию учить.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var d,u,a,b,s:real;
begin
clrscr;
repeat
write('Введите длину диагонали>0 d=');
readln(d);
until d>0;
repeat
write('Введите угол между длинной стороной и диагональю (0..90) u=');
readln(u);
until(u>0)and(u<90);
u:=u*pi/180;
a:=d*cos(u);
b:=d*sin(u);
writeln('a=',a:0:2,' b=',b:0:2);
s:=a*b;
write('Площадь=',s:0:2);
readln
end.


Вернуться к обсуждению:
Вычислить площадь прямоугольника по диагонали и углу между диагональю и большей стороной Turbo Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.01.2013, 18:44
Готовые ответы и решения:

Найти сторону прямоугольника по диагонали и углу между стороной и диагональю
Диагональ прямоугольника равна 6 см и образует с меньшей стороной угол 60 градусов. Найти меньшую...

Вычислить площадь параллелограмма по двум сторонам и углу между ними
Составить программу и блок схему к ней. Заранее благодарен. &quot;Вычислить площадь параллелограмма по...

Найдите градусную меру угла между плоскостью π и большей стороной прямоугольника
Стороны прямоугольника равны 1 и 2. Меньшая сторона прямоугольника лежит в плоскости π, а...

Вычислить площадь и периметр квадрата со стороной а,площадь и периметр прямоугольника со сторонами b и с
вычислить площадь и периметр квадрата со стороной а, площадь и периметр прямоугольника со сторонами...

1
13.01.2013, 18:44
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.01.2013, 18:44
Помогаю со студенческими работами здесь

Вычислить площадь треугольника по двум сторонам и углу между ними
консольное приложение, вычислить площадь треугольника по двум сторонам и углу между ними

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

Найти площадь прямоугольника по диагонали
Даны координаты диагонали прямоугольника. Найти ее площадь.

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru