Регистрация
lox54
28.02.2022 22:06
Информатика
Есть ответ 👍

В 5й строчке пишет ошибка. Встречено 'while', а ожидалось ';'

143
299
Посмотреть ответы 1

Ответы на вопрос:

yaroslavpilip
yaroslavpilip
4,8(71 оценок)
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

Популярно: Информатика