Найти ошибку пишет : неверно сконструированное форматное выражение там, где х=х+0,2. посчитать функцию на интервале от 0,1 до 1,3 с шагом 0,2
program abc2;
var x,y: real;
begin
x: =0.1;
repeat
if (sqr(x)-1.8*x+1.2)=0 then
writeln('x=',x,'нельзя вычислить функцию')
else
y: =(364*sqr(x)*exp(-7.5*x))/(sqr(x)-1.8*x+1.2);
if y> 1 then
writeln('y=',y: 8: 3);
x: =x+0.2:
until x> 1.3;
end.
158
166
Ответы на вопрос:
Популярно: Информатика
-
pkfz17801.04.2023 12:25
-
didlok11.06.2023 01:04
-
Света11111111119079г07.06.2022 16:14
-
ЖибекСуонн308.01.2020 22:50
-
donczowakateri08.05.2021 06:35
-
ynal200118.08.2022 10:48
-
mysya406.08.2021 01:18
-
25marta5221.09.2021 15:56
-
Rondov01.10.2020 20:14
-
Fgbjhjghhy123456789030.10.2020 06:40