Question

Ребят , помогите пожалуйста с информатикой ,я в ней вообще ноль . Составьте алгоритм вывода на экран значений функций 6x^2+x-10 для x от 1 до 100 , если я не ошибаюсь, нужно составить циклический алгоритм . Заранее спасибо

Answer 1

Var x,y:integer;
begin
for x:=1 to 100 do
begin
 y:= 6*sqr(x)+x-10;
write('     x= ',x, ' y= ',y);
end;
readln;
end.

Answer 2

Вот примерно так будет выглядеть