Блок схему пж
const
min = 0;
max = 10;

var i:byte;

begin
writeln('2a^5*3a^2-1.7a+12');
for i:=min to max do
writeln('a=',i,', ', 2* i*i*i*i*i * 3 * i*i - 1.7*i + 12);
end.