Вычислить значение функции, заданной графически

@Vlad2606 · Регистрация: 24.06.2014

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

Вычислить значение функции, заданной графически

@erl27 · 25.06.2014, 18:23

Pascal

var
  x, y: real;
 
begin
  write('x = ');
  readln(x);
  if x < 0 then writeln('Выход за пределы области определения')
  else begin
    if x < 1 then y := x
    else y := 1;
    writeln('y = ', y)
  end
end.

@Cyborg Drone · 26.06.2014, 18:16

erl27, где сказано, что при x < 0 функция не определена? Или откуда это видно? Так, наверное:

Pascal

var
  x, y: real;
 
begin
  write('x = ');
  readln(x);
  if x < 0 
    then y := 0
    else if x < 1 
      then y := x
      else y := 1;
    writeln('y = ', y)
  end
end.

@erl27 · 26.06.2014, 18:25

Cyborg Drone, я долго всматривался в график, но так и не понял, поэтому решил один из вариантов

@Vlad2606 0 / 0 / 0 Регистрация: 24.06.2014 Сообщений: 11
		1
	Вычислить значение функции, заданной графически 25.06.2014, 02:29. Показов 1317. Ответов 3 Метки нет (Все метки) 0

@erl27 906 / 754 / 833 Регистрация: 06.09.2013 Сообщений: 1,561
	26.06.2014, 18:25	4
	Cyborg Drone, я долго всматривался в график, но так и не понял, поэтому решил один из вариантов 0

Опции темы