Вычислить и вывести на экран в виде таблицы N значении функции F на интервале от Хнач. до Хкон

@007in · Регистрация: 29.09.2015

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

Вычислить и вывести на экран в виде таблицы N значении функции F на интервале от Хнач. до Хкон. Шаг dX=( Хкон - Хнач)/N.

@Puporev · 30.09.2015, 09:15

Pascal

var a,b,c,x,xn,xk,dx,f:real;
    n,i,k:integer;
begin
writeln('Введите a,b,c');
readln(a,b,c);
write('Начало интервала xn=');
readln(xn);
repeat
write('Конец интервала >',xn:0:1,' xk=');
readln(xk);
until xk>xn;
repeat
write('Введите n>1 n=');
readln(n);
until n>1;
dx:=(xk-xn)/n;
 
for i:=0 to n do
 begin
  x:=xn+i*dx;
  k:=0;
  if(c<0)and(x<>0)then f:=-a*x-c
  else if(c>0)and(x=0)then f:=(x-a)/-c
  else
   begin
    if c=a then k:=1
    else f:=b*x/(c-a);
   end;
  if k=1 then writeln('x=',x:6:2,' f(a,b,c,x) не определено')
  else writeln('x=',x:6:2,' f(a,b,c,x)=',f:6:3)
 end;
end.

@007in · 11.10.2015, 22:22 **[ТС]**

Спасибо!

@007in 0 / 0 / 0 Регистрация: 29.09.2015 Сообщений: 4
		1
	Вычислить и вывести на экран в виде таблицы N значении функции F на интервале от Хнач. до Хкон 29.09.2015, 23:07. Показов 1246. Ответов 2 Метки нет (Все метки) Вычислить и вывести на экран в виде таблицы N значении функции F на интервале от Хнач. до Хкон. Шаг dX=( Хкон - Хнач)/N. 0

@007in 0 / 0 / 0 Регистрация: 29.09.2015 Сообщений: 4
	11.10.2015, 22:22 [ТС]	3
	Спасибо! 0

Опции темы

Вычислить и вывести на экран в виде таблицы N значении функции F на интервале от Хнач. до Хкон

Решение