Ged

Получил 5 баллов, спасибо и на этом. З.Ы. препод сказал,что слишком объемно делал(использовал код Кэра)

хорошо мастер, в следующий раз так и сделаю.Алюминь

знал бы как решать-решил бы сам. Я смотрю умников у коммьюнити варспы не убавилось

спасибо огромное

добрый вечер. Блин, фотка ушла с хостинга,ща перезалью

да. факультет химических технологий

Гайс, учусь на хим факе, помогите с лабой кто-нибудь... Задание:Составить программу,отладить ее и произвести на ЭВМ соответ. вычисления P.S. Кэр Лаэда, я вызываю тебя!

program qq; uses crt; function f(x:double):double; begin f:=arctan(0.2*x)/1+sqr(x); end; var h:double; x:double:=0; begin Write('Введите шаг (0..1] : '); Readln(h); writeln(' x f(x)'); writeln; while (x begin writeln(x:8:4,f(x):8:4); x:=x+h; end; Readln; end. я переделал все...нормально,нет?

мах х это получается 1, потому что отрезок то от 0 до 1...хотя, мб я не так понял вообще

а их нет в условии как бы

не так выразился. Не условие, а вообще задача: составить программу для вычисления и печати таблицы значений функции y=f(x) на отрезке [0;1] с шагом h. arctg(0.2x)/1+x^2

Гайс, всем привет. Короче, есть у меня условие задачи:составить программу для вычисления и печати таблицы функции[/size] y=f(x) na otrezke [0:1] s shagom h: arctg(0.2x)/1+x^2 начал составлять прогу: program qq; uses crt; var x,y,h: real; begin clrscr; write('x= '); read(x); write('y= '); read(y); write('maxx= '); read(1); read (a,b,h); while (x begin y:=arctg(0.2*x)/1+x*x; writeln(x,y); x:=x+h end; while (0 begin y:=arctg(0.2*x)/1+x*x; writeln(x,y); x:=x+h end; Что, собственно говоря,дальше? я понять не могу