Pascal. Протабулировать функцию: y=x^2 на отрезке [-10;10] с шагом 1.

Программа на Pascal:
program Tabul;
var x, y: integer;
begin
  writeln('x y');
  for x := -10 to 10 do
  begin
    y := x * x;
    writeln(x:4, y:6);
  end;
end.

Здесь переменная \(x\) принимает значения от \(-10\) до \(10\) с шагом \(1\), а значение функции считается по формуле \(y=x^2\).

0 0 Пожаловаться