информационные долги...

[sokol987]

через 2 часа экзамен
пожалуйста решите одну задачу!!!(паскаль АВС)

[Яна696]

Uses CRT;
var z,x,k,i:integer;
begin
clrscr;
write('vvedite z');
readln(z);
write('vvedite x');
readln(x);
write('vvedite k');
readln(k);
if z>k then begin
a:=atan(x)/(z+k)^(1/4)
else
for i:=-1 to 3:0.5 do
y:=(0.8*x^3*exp(-3.5*x))/sqrt(z+x);
if y>3.5 then writeln('y>3.5',y);
end;
readkey;
end.

Я очень не уверена, т.к. решала спеша и без проверки. Если бы ты за несколько дней до этого разместил, то я бы не спеша решила. В общем, лучше так,чем никак. И я в упор не помню как шаг указывать и арктангенс тоже...

[Son Of Pain]

В паскале нет оператора возведения в степень. И шаг циклу for задавать нельзя )