Помогите пожалуйста с информатикой!! Около стены наклонно стоит палка длиной x
Помогите пожалуйста с информатикой!!
Около стены наклонно стоит палка длиной x м. Один ее конец находится на расстоянии y м от стены. Найти значение угла меж палкой и полом для значений x=k м и y, изменяющегося от 2 до 3 метров с шагом h м.
1 ответ
Борис Пассюк
Var x, h, y, alpha : real;
begin
write('k = ');
read(x);
write('h = ');
read(h);
y := 2;
while y lt; 3 + 1E-9 do
begin
writeln('y = ', y, ', alpha = ', arccos(y / x) * 180 / pi : 0 : 3);
y := y + h;
end;
end.
Пример работы программки:
k = 5
h = 0.1
y = 2, alpha = 66.422
y = 2.1, alpha = 65.165
y = 2.2, alpha = 63.896
y = 2.3, alpha = 62.613
y = 2.4, alpha = 61.315
y = 2.5, alpha = 60.000
y = 2.6, alpha = 58.668
y = 2.7, alpha = 57.316
y = 2.8, alpha = 55.944
y = 2.9, alpha = 54.549
y = 3, alpha = 53.130
begin
write('k = ');
read(x);
write('h = ');
read(h);
y := 2;
while y lt; 3 + 1E-9 do
begin
writeln('y = ', y, ', alpha = ', arccos(y / x) * 180 / pi : 0 : 3);
y := y + h;
end;
end.
Пример работы программки:
k = 5
h = 0.1
y = 2, alpha = 66.422
y = 2.1, alpha = 65.165
y = 2.2, alpha = 63.896
y = 2.3, alpha = 62.613
y = 2.4, alpha = 61.315
y = 2.5, alpha = 60.000
y = 2.6, alpha = 58.668
y = 2.7, alpha = 57.316
y = 2.8, alpha = 55.944
y = 2.9, alpha = 54.549
y = 3, alpha = 53.130
София Равданская
Угол выводится в градусах
Никита Витошкин
спасибо)
Valerija Medeckaja
Пожалуйста
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Облако тегов