Question

100 баллов прошу, на Паскаль


Cоставьте программу на языке Паскаль для вывода таблицы значений функции y(x) = 8x^2 + 1 при x ∈ [–4; 4]. Для изменения значения Х задать шаг, равный 0,5.

Answer 1

Ответ:

program z;

var x:real;

begin

x:=-4;

repeat

writeln('x = ',x:4,'     y = ',8*sqr(x) + 1);

x:=x+0.5

until x>4

end.