Около стены наклонно стоит палка длиной x м. Один ее конец находится на расстоянии y м от стены. Определить значение угла между палкой и полом для значений x=k м и y, изменяющегося от 2 до 3 метров с шагом h м. (решить в паскал...
Около стены наклонно стоит палка длиной x м. Один ее конец находится на расстоянии y м от стены. Определить значение угла между палкой и полом для значений x=k м и y, изменяющегося от 2 до 3 метров с шагом h м. (решить в паскале ,цикл с параметром.Помогите )
Гость
Ответ(ы) на вопрос:
Гостьvar
h,x,y:real;
begin
writeln('Введите значения k и h');
readln(x,h);
y:=2;
while y<=3.000001 do begin //3.000001 преодолевает погрешность накопления y
writeln(y:6:3,ArcCos(y/x):6:3);
y:=y+h
end
end.
Тестовый прогон:
Введите значения k и h
4.5 0.1
2.000 1.110
2.100 1.085
2.200 1.060
2.300 1.034
2.400 1.008
2.500 0.982
2.600 0.955
2.700 0.927
2.800 0.899
2.900 0.870
3.000 0.841
Не нашли ответ?
Похожие вопросы