Ответы
Ответ дал:
0
var i,k:integer;
begin
readln(k);
for i:=1 to k do
write(i,' ',i,' ')
end.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад