< >

Даны целые числа K и N  (N > 0). Вывести N раз число K. 

Ответы

Ответ дал: Tlalok
0

var

  k,n, i:integer;

begin

  write('k = '); readln(k);

  write('n = '); readln(n);

  for i := 1 to n do

    writeln(k);

end.

Похожие вопросы
Русский язык
2 года назад
как составить предложения употребив в них слова с труднопроверяемыми  согласными про зиму
Русский язык
2 года назад
разгадайте кросворт    1.язык который возник раньше других 2.речь которая записывается на бумаге 3.то что используют животные для разговора кроме звуков  
Математика
7 лет назад
Числовая последовательность 5 3 8 11 19 Назовите закономерность, определите следующее число
Математика
7 лет назад
У Светы больше в 4 раза больше марок чем у Кати.А у Кати на 69 марок меньше чем у Светы.Сколько марок у каждой?
Математика
10 лет назад
рабочие столярной мастерской должны были за неделю сделать 16 шкафов,а сделали на 2 шкафа больше. сколько шкафов сделали рабочие?
Математика
10 лет назад
2-ое мальчиков бросали баскетбольный мяч. 1 мальчик из 20 бросков имел 13 попаданий, а 2 мальчик из 26 бросков имел 15 попаданий. Найдите для каждого мальчика, какую часть составляли попадания от
Химия
10 лет назад
Как решить HCl+KMnO4=KCl+MnCl2+Cl2+H2O? Помогите, плиз!!!!
Геометрия
10 лет назад
В треугольнике АВС сторона а=7 b=8 c=5 Найти <А=?