Составьте программу, которая выводит квадраты чисел от 11 до 19 (использовать цикл for) на паскале

var i, a:integer;

begin

for i=11 to 19 do

begin

a=i*i;

writeln(a);

end;

end.