Вычислить кубы чисел от 10 до 20 в Паскале. Используя три цикла: for, while, repeat

____________for____________var i:integer;beginfor i:=10 to 20 dowriteln(i,'^3 = ', i*i*i);end._________while____________var i:integer;begini:=10;while i<=20 do beginwriteln(i,'^3 = ', i*i*i);inc(i);end;end.__________repeat_________var i:integer;begini:=10;repeatwriteln(i,'^3 = ', i*i*i);inc(i);until i>20;end.