|
   |
| Модератор форума: No_MaTTeR, Dimitro, LightInDarkness |
| Форум Полезное Флудилка Нужна помощь начинающему программисту(турбо паскаль) (Задачка) |
| Нужна помощь начинающему программисту(турбо паскаль) |
В общем не могу решить задачу.
Собственно и она: Original Цитата Визначити довжину діагоналі і площину прямокутника, вписаного в коло радіусом R, якщо відношення його сторін дорівнює n. Google translate Цитата Определить длину диагонали и плоскость прямоугольника, вписанного в окружность радиусом R, если отношение его сторон равно n. Нужно решить задачу в турбо-паскале, напишите пожалуйста и опишите что есть что. (В матиматике не шарю, из-за этого прошу у вас помощи).
_Ice[Baby]_ - старый профиль
|
Цитата (f0t1k) і площину Цитата (f0t1k) и плоскость Шта? Может "площу" (рус. площадь)?
Arcanum Core © Dev.
Для запросов на выдачу наград/снятие замечаний есть темы в Работе Портала. Не пишите по этому поводу в личку. |
Цитата (JustesS) Щас переведу нормально. Цитата (JustesS) площу (математическую) Что такое площа? Не припоминаю такого слова в русском языке. Перевести я и сам могу, благо украинский знаю и обучение проходило на украинском. Суть моих претензий в том, что если в оригинале ДЕЙСТВИТЕЛЬНО написано "площину прямокутника", то переводится это не иначе как "плоскость прямоугольника", но тогда задача становится мне непонятной. Итак, сегодня мы выучили несколько украинских слов: Площина - плоскость (рус.). Площа - площадь (рус.). По сабжу, длина диагонали будет равна диаметру, что есть два радиуса => 2*R. Площадь (если, конечно, спрашивали про нее) - как ее найти зная только длину диагонали и соотношение сторон, честно, я не помню. Из того, что помню, все, что связано с площадью и диагональю находится через углы, которых в условии нет.
Arcanum Core © Dev.
Для запросов на выдачу наград/снятие замечаний есть темы в Работе Портала. Не пишите по этому поводу в личку. |
uses crt;
var a,b,R,d,S,n: real; BEGIN clrscr; write('Vvedite Radius okrujnosti: '); readln®; write('Vvedite otnosheniye storon pryammougolnika, vpisannogo v etu okrujnost: '); readln(n); d:=2*R; b:=sqrt(d*d/(1+n*n)); a:=b*n; S:=a*b; writeln('Diaqonal: ',d:5:2,', Ploshad: ',S:5:2); repeat until keypressed; END. взял отсюда тык 
Сообщение # 8 написано 01.10.2013 в 17:01
|
| |||
| |||