Блок схему пж 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.
Делало за меня FCEditor, удобно !