система уравнений

@burn · Регистрация: 31.08.2012

решить систему уравнений на pascal

@Puporev · 08.09.2012, 13:15

Это не система уравнений, да и уравнений никаких нет. Просто нужно вычислить значение выражения по формуле, которая выбирается в зависимости от значения х.
Просто вводите значения x,b,c и вычисляете

Pascal

if(x<>=0)or(x>10) then y:=.....
else if(x>0)and(x<=5) then y:=...
else y:=....
write('y=',y:0:2) ;

@BumerangSP · 08.09.2012, 13:19

Pascal

uses crt;
var x,c,b,y: real;
begin
 clrscr;
 write('c,b,x: ');
 readln(c,b,x);
 if (x<=0) and (x>10) then
  y:=(2*c+sqr(b))*x
 else
  if (x>0) and (x<=5) then
   y:=2*c+x
  else
   if (x>5) and (x<=10) then
    y:=(2*c-sqr(b))*x;
 writeln('Y = ',y);
 readln;
end.

Добавлено через 15 секунд
эх, опоздал...)

@burn 0 / 0 / 0 Регистрация: 31.08.2012 Сообщений: 27
		1
	система уравнений 08.09.2012, 13:00. Просмотров 35427. Ответов 2 Метки нет (Все метки) решить систему уравнений на pascal 0 Миниатюры

Опции темы

система уравнений

Решение