Составить программу вычисления (подробнее внутри)

@dmitriy369 · Регистрация: 29.10.2012

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

Составить программу вычисления значений функции W для заданных значений параметров и значений аргумента Х, изменяющегося от Хнач до Хкон с шагом Н. Предусмотреть вывод сообщения о том, что функция не определена для данного значения Х. Алгоритм вычисления значений функции программно реализовать: для случая вещественных данных и операций (использовать вложенные операторы IF); для случая целочисленных данных и операций (использовать оператор CASE). Данные случаи реализовать в одной программе: 1 — первый случай, 2 — второй случай. Структура выводной информации: номер по порядку, значение аргумента Х, значение функции или сообщение «функция не определена».

Название: 111.jpg
Просмотров: 68

Размер: 10.8 Кб

Название: 111.jpg
Просмотров: 68

Размер: 10.8 Кб

@Puporev · 04.11.2012, 21:39

Pascal

uses crt;
var xn,x,xk,dx,w:real;
   i,k:integer;
begin
clrscr;
write('Введите Х начальное xn=');
readln(xn);
repeat
write('Введите Х конечное >',xn:0:1,' xk=');
readln(xk);
until xk>xn;
repeat
write('Введите шаг табуляции <',xk-xn:0:1,' dx=');
readln(dx);
until dx<xk-xn;
x:=xn;
k:=0;
while x<=xk+dx/2 do
 begin
  k:=k+1;
  if (x>=-72)and(x<-2) then
   begin
    w:=0;
    for i:=1 to 15 do
    w:=w+sqr(i-2);
    w:=w*x;
    writeln(k:2,' x=',x:4:1,' w=',w:7:3);
   end
  else if(x>=-2)and(x<=7) then
   begin
    w:=2*x*x+5*x;
    writeln(k:2,' x=',x:4:1,' w=',w:7:3);
   end
  else if x>7 then
   begin
    w:=sin(x*x+1)+exp(5*x);
    writeln(k:2,' x=',x:4:1,' w=',w:7:3);
   end
  else writeln(k:2,' x=',x:4:1,' функция не определена');
  x:=x+dx;
 end;
readln
end.

@dmitriy369 0 / 0 / 1 Регистрация: 29.10.2012 Сообщений: 13
		1
	Составить программу вычисления (подробнее внутри) 04.11.2012, 19:21. Показов 1260. Ответов 1 Метки нет (Все метки) Составить программу вычисления значений функции W для заданных значений параметров и значений аргумента Х, изменяющегося от Хнач до Хкон с шагом Н. Предусмотреть вывод сообщения о том, что функция не определена для данного значения Х. Алгоритм вычисления значений функции программно реализовать: для случая вещественных данных и операций (использовать вложенные операторы IF); для случая целочисленных данных и операций (использовать оператор CASE). Данные случаи реализовать в одной программе: 1 — первый случай, 2 — второй случай. Структура выводной информации: номер по порядку, значение аргумента Х, значение функции или сообщение «функция не определена». 0

	04.11.2012, 21:39

Составить программу вычисления (подробнее внутри)

Решение