Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры

@Kristina123 · Регистрация: 11.06.2013

Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры.

@Reveng · 16.06.2013, 21:40

Проверяйте..

Pascal

var
  x, y : real;
  r1, r2 : integer;
  
begin
  write('r1 = '); readln(r1);
  write('r2 = '); readln(r2);
  write('x = '); readln(x);
  if (x >= -3) and (x < -2) then y := - (x + 2)
    else if (x >= -2) and (x < 0) then y := sqrt(sqr(r1) - sqr(x+1))
      else if (x >= 0) and (x < 4) then y := - sqrt(sqr(r2) - sqr(x - 2))
        else if (x >= 4) and (x < 6) then y := (-x + 4)/2
          else if (x >= 6) and (x <= 7) then y := -1;
  writeln('Ответ: x = ', x:0:3, ' y = ', y:0:3);
end.

@Kristina123 · 24.06.2013, 19:24 **[ТС]**

а вот для этой ???

@Kristina123 · 24.06.2013, 19:43 **[ТС]**

помогите пожалуйста очень срочно надо

@Kristina123 2 / 2 / 0 Регистрация: 11.06.2013 Сообщений: 36
		1
	Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры 16.06.2013, 20:39. Просмотров 3430. Ответов 3 Метки нет (Все метки) Написать программу, которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры. 0 Миниатюры

@Kristina123 2 / 2 / 0 Регистрация: 11.06.2013 Сообщений: 36
	24.06.2013, 19:24 [ТС]	3
	а вот для этой ??? 0 Миниатюры

@Kristina123 2 / 2 / 0 Регистрация: 11.06.2013 Сообщений: 36
	24.06.2013, 19:43 [ТС]	4
	помогите пожалуйста очень срочно надо 0

Опции темы