Напишите программку на языке Паскаль для задачи: Ввести числа a и

1)
program square_cube; // с циклом for
var a, b: integer;
begin
writeln(enter two numbers with a space );
readln(a, b);
for i: integer:= a to b do writeln(power(i, 2) : 8, power(i, 3) : 8)
end.

2)
program square_cube1; //c циклом while
var a, b: integer;
begin
writeln(enter two numbers with a space );
readln(a, b);
while (a lt; b) or (a = b) do
begin
writeln(power(a, 2) : 8, power(a, 3) : 8);
a:= a + 1;
end
end.

3)
program square_cube2; //с циклом repeat
var a, b: integer;
begin
writeln(enter two numbers with a space );
readln(a, b);
repeat
writeln(power(a, 2) : 8, power(a, 3) : 8);
a:= a + 1;
until a = b + 1;
end.