Ответы и объяснения

2013-12-14T06:01:09+00:00
Program z10;
uses crt;
var i,t:shortint;
y:real;
begin
clrscr;
for i:=-3 to 15 do begin
t:=i-1;
y:=2*t*t-1.2*t+1;
writeln('x=',i,' y=',y:2:1);
end;
readkey
end.