1. Составить программу нахождения значения функции по заданному х. Программу запустить...

Question

1. Составить программу нахождения значения функции по заданному х.
Программу запустить три раза, проверив каждый интервал.

---

Comments

Паскаль? Бейсик? С++?

---

Паскаль

---

Опираться на чертёж или на функции?)) Парабола при x = 2 даст 4, а на рисунке всего 1))

---

на функции.

Answer 1

Var
X:real;
Begin
Write('X = ');ReadLn(X);
if abs(X)<=2 then Write('Y = ',X*X)<br>else Write('Y = ',1);
End.

или так:

Var
X,Y:real;
Begin
Write('X = ');
ReadLn(X);
if abs(X)<=2 then Y:=X*X<br>else Y:=1;
WriteLn('Y = ',Y)
End.

Первый запуск:
X = 1.3
Y = 1.69
Второй:
X = 2.71828
Y = 1
Третий:
X = -3.141592
Y = 1