Работаю с Pascal ABC! Помогите решить задание "Составьте программу вычисления значения "у" по формуле y=sin x+1_х ( ну там дроби где 1_х) , для которой значение "х" вводить с клавиатуры, и табличка "х=5", и "у=-,0758924" Прошу написать дословно текст, который нужно будет вставить в Pascal ABC, кто может!
переделай под свою эту прогу, не сможешь, я сделаю недорого
program yabulaciya; // f:=sin(k*k*k)/cos(k*k*k) + sin(k - 2.4);
uses crt; //x<4
var a:integer;
f,k:real;
BEGIN
clrscr;
writeln('vichislenie funkcii');
writeln('---------------------');
writeln;
write('vvesti levuy granicu promegutka A (celoe!)-->');
readln(a);
writeln;
writeln(' x f');
writeln('----------------');
k:=a;
repeat
f:=sin(k*k*k)/cos(k*k*k) + sin(k - 2.4);
writeln(k:6:2,f:7:2);
k:=k+0.2;
until k >4;
writeln('----------------');
writeln;
writeln('konec zadachi');
readkey;
END.
⇢