Delakus
6 год назад
Program fhg;varx:integer;y:real;beginwrite('Введите x');readln(x);y:=(4*sqrt(x-2))/((sqr(sin(2*x)))+In((abs(x-3))/(2.6*x)));writeln('Ответ',y);end.Где ошибка ? Пишет , что Встречено 'In', а ожидалось выражениеНапишите плиз , где ошибка!!И напишите . как правильно сделать !Напишите!
ОТВЕТЫ
Stephens Robert
Oct 24, 2020
var
x, y:real;
begin
write('Введите x ');
readln(x);
y:=4*sqrt(x-2)/(sqr(sin(2*x))+ln(abs(x-3)/(2.6*x)));
writeln(' ',y);
end.
Пример:
Введите x 2.5
-1.718976394087695e+00
x, y:real;
begin
write('Введите x ');
readln(x);
y:=4*sqrt(x-2)/(sqr(sin(2*x))+ln(abs(x-3)/(2.6*x)));
writeln(' ',y);
end.
Пример:
Введите x 2.5
-1.718976394087695e+00
115
Смежные вопросы:
