Программа решения выражения и функции

@znt · Регистрация: 25.02.2013

Студворк — интернет-сервис помощи студентам

Помогите решить задачу,а то у меня не получается(

@mss · 18.03.2013, 20:26

Сообщение от znt

а то у меня не получается

а то ты что-то вообще делал

@znt · 18.03.2013, 20:50 **[ТС]**

я тебя огорчу,но делал)вот код.А как сделать подпрограмму?

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var s,t,r:real;
function f(a,b,c:real):real;
 begin
          f:=(2*a-b-sin(c))/(5+abs(c));
     end;
   begin
    t:=StrToInt(Edit1.Text);
    s:=StrToInt(Edit2.Text);
    r:=f(t,-2*s,1.17)+f(2.2,t,s-t);
    edit3.Text:=FloatToStrF(r,fffixed,8,4);
 
 
end;
 
end.

@mss · 18.03.2013, 20:55

Сообщение от znt

но делал)вот код

То есть тебе еще и в ножки нужно покланяться, чтобы ты милостиво соизволил привести свои наработки, так ?

Добавлено через 1 минуту

Сообщение от znt

А как сделать подпрограмму?

Button1Click и есть подпрограмма.

@znt · 18.03.2013, 21:11 **[ТС]**

Сообщение от mss

То есть тебе еще и в ножки нужно покланяться, чтобы ты милостиво соизволил привести свои наработки, так ?

Добавлено через 1 минуту

Button1Click и есть подпрограмма.

Не прав согласен.Спасибо

@znt 0 / 0 / 1 Регистрация: 25.02.2013 Сообщений: 12
		1
	Программа решения выражения и функции 18.03.2013, 19:48. Показов 1231. Ответов 4 Метки нет (Все метки) Помогите решить задачу,а то у меня не получается( Миниатюры 0

@mss 2649 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	18.03.2013, 20:26	2
	Сообщение от znt а то у меня не получается а то ты что-то вообще делал 0

@mss 2649 / 2270 / 279 Регистрация: 24.12.2010 Сообщений: 13,723
	18.03.2013, 20:55	4
	Сообщение от znt но делал)вот код То есть тебе еще и в ножки нужно покланяться, чтобы ты милостиво соизволил привести свои наработки, так ? Добавлено через 1 минуту Сообщение от znt А как сделать подпрограмму? Button1Click и есть подпрограмма. 1

@znt 0 / 0 / 1 Регистрация: 25.02.2013 Сообщений: 12
	18.03.2013, 21:11 [ТС]	5
	Сообщение от mss То есть тебе еще и в ножки нужно покланяться, чтобы ты милостиво соизволил привести свои наработки, так ? Добавлено через 1 минуту Button1Click и есть подпрограмма. Не прав согласен.Спасибо 0

Опции темы