Вычислить и напечатать таблицы значений функции y= f(x)

[andreis459]

Вычислить и напечатать таблицы значений функции y= f(x) на
интервале значений x[a+b] с шагом h (решить задачу с помощью трех типов
циклов: с параметром, с предусловием, с постусловием; предусмотреть в
программе возможность выбора типа цикла):

y= f(x) y=(1+√x)/(ln|tg x|+sin x )

a≤x≤b 1≤x≤π

h 0,25

[p51x]

раздел фриланса ниже

[phomm]

могу решить за небольшую сумму, пиши, договоримся.

если есть наработки , то выкладывай, поможем поправить , а готовые решений - обычно только за деньги

[andreis459]

program EXAMPLE_5;
uses crt;
var x,y:real; i:integer; c:char;
begin
repeat
clrscr;
writeln('Задание 5. Вариант № 1');
write('Введите начальное значение х=');
readln(x);
writeln('Выберите вид цикла. Нажмите:');
writeln('1 - для цикла FOR');
writeln('2 - для цикла WHILE');
writeln('3 - для цикла REPEAT');
writeln('0 - выход из программы');
readln©;
case c of
'1':for i:=1 to 21 do
Begin
y:=sqr(1+√x)/(ln|tg x|+sin x )


проблема с ( y:=sqr(1+√x)/(ln|tg x|+sin x ) )

[unbanned]

y:=sqr(1+√x)/(ln|tg x|+sin x ) )

y:=sqr(1+sqrt(x))/(ln(abs(sin(x)/cos(x)))+sin(x));