Даны два числа A и B. вывести на экран квадрат числа В А раз.
Даны два числа A и B. вывести на экран квадрат числа В А раз.
Гость
Ответ(ы) на вопрос:
ГостьVar b:real; c, a:integer;
Begin
Readln(a, b) ;
For c:=1 to a do
Writeln(sqr(b));
End.
Не нашли ответ?
Похожие вопросы