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

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.

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