Найти значения функции у = х^2+5 в промежутке [-5;5] с шагом 1

Question

Найти значения функции у = х^2+5 в промежутке [-5;5] с шагом 1

Answer 1

Program p1;
var y,i:integer;
begin
for i:=-5 to 5 do
begin
y:=i*i+5;
writeln(i,' ', y);
end;
end.

Answer 2

Var
  x:integer;
begin
  for x:=-5 to 5 do Writeln(x:2,x*x+5:4)
end.

Результат
-5  30
-4  21
-3  14
-2   9
-1   6
 0   5
 1   6
 2   9
 3  14
 4  21
 5  30

Comments

Ааааа

---

Да нет, у нас хороший учитель , он мне вообще на С++ писать разрешает на уроке

---

а зачем его обсуждать в классе? Мне лично синтаксис С++, понятнее, учитель его понимает. Вот и все)

---

По крайней мере он более близок к ООП языкам , нежели Паскаль

---

Ага