построить таблицу значений для функции y=x^2, на отрезке[4;10], с шагом 0,1

var
   x: real;

begin
   writeln(x, #9, y);
   x := 4;
   while(x <= 10) do
   begin
      writeln(x:3:1, #9, x * x:4:2);
      x := x + 0.1;
   end
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку