Даны два числа 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.