Предмет: Информатика,
автор: Katynket
Даны целые числа K и N (N > 0). Вывести N раз число K.
Ответы
Автор ответа:
0
var
k,n, i:integer;
begin
write('k = '); readln(k);
write('n = '); readln(n);
for i := 1 to n do
writeln(k);
end.
Интересные вопросы
Предмет: Русский язык,
автор: aardak815
Предмет: История,
автор: ositc
Предмет: Русский язык,
автор: zaudanbek
Предмет: Химия,
автор: Sandrina94