Написать программу, которая выводит таблицу значений функции у = \х - 2| + |х + 1|....

Question

Написать программу, которая выводит таблицу значений функции у = \х - 2| + |х + 1|. Диапазон изменения аргумента - от -4 до 4, шаг приращения аргумента — 0,5.

Answer 1

PascalABC.NET
Версия 3.3. сборка 1583 (25.11.2017)

var x:real;
begin
 x:=-4.5;
 writeln('x    y');
 for var i:=1 to 17 do
 begin
  x:=x+0.5;
  writeln(x,'    ',abs(x-2)+abs(x+1));
 end;
readln;
end.

Пример:
x  _  y
-4  _  9
-3.5  _  8
-3  _  7
-2.5  _  6
-2  _  5
-1.5  _  4
-1  _  3
-0.5  _  3
0  _  3
0.5  _  3
1  _  3
1.5  _  3
2  _  3
2.5  _  4
3  _  5
3.5  _  6
4  _  7

Comments

Fatal: Internal error 200611054

---

Fatal : Compilation aborted

---

хм..

---

А вы собственно где код тестили, случайно не Free Pascal?

---

да

---

А теперь, посмотрите где писал я

---

а мне нужно в этой программе , помогите

---

Сейчас исправлю

---

var x:real;
i:integer;
begin
x:=-4;
writeln('x y');
for i:=1 to 17 do
begin
writeln(x,' ',abs(x-2)+abs(x+1));
x:=x+0.5;
end;
end.

---

большое спасибо