Даны целые числа K и N (N больше 0). Вывести N раз число K.
Даны целые числа K и N (N > 0). Вывести N раз число K.
Ответ(ы) на вопрос:
var k,n, i:integer; begin write('k = '); readln(k); write('n = '); readln(n); for i := 1 to n do writeln(k); end.
Не нашли ответ?
Похожие вопросы