Процедуры и функции: вычислить значения функции на заданном отрезке с заданным шагом

09.01.2013, 18:10. **Показов** 2436. **Ответов** 1

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

Процедуры и функции: вычислить значения функции на заданном отрезке с заданным шагом

ребята, помогите, пожалуйста!
Срочно нужна такая программка по выделенному варианту...
у самой никак не получается(
очень рассчитываю на вашу помощь! с комментариями к программе, если нетрудно

@CodeR · 10.01.2013, 09:23

Pascal

Const nx=2;kx=4.03;h=0.2;
      l='----------------';
Var x,a,b,c:real;
Function F(x:real):real;
Begin
    F:=(a*sin(x))/(b+c);
End;
Begin
    Repeat
     write('Введите a,b,c: ');readln(a,b,c);
    Until (b+c)<>0;
    writeln(l);
    writeln('   X   | ','   Y   |');
    writeln(l);
    x:=nx;
    While x<=kx do
    Begin
      writeln(x:6:2,'|':2,F(x):8:4);
      x:=x+h;
    End;
    readln;
End.

Darechka
		1
	Процедуры и функции: вычислить значения функции на заданном отрезке с заданным шагом 09.01.2013, 18:10. Показов 2436. Ответов 1 Метки нет (Все метки) ребята, помогите, пожалуйста! Срочно нужна такая программка по выделенному варианту... у самой никак не получается( очень рассчитываю на вашу помощь! с комментариями к программе, если нетрудно

Опции темы

Процедуры и функции: вычислить значения функции на заданном отрезке с заданным шагом

Решение