Даны два числа A и B. вывести на экран квадрат числа

Квадрат числа рассчитывается с поддержкою функции power(B, 2), где B введенное число, 2 показатель ступени.
Цикл for i:= 1 to A do write(power(b, 2) : 6) выводит А раз квадрат числа.

program sqr_n;
var A, B, i: integer;
begin
writeln(Введите целые числа A и B через пробел);
readln(a, b);
for i:= 1 to A do write(power(b, 2) : 6);
end.