oleg20111511
6 lines
89 B
ObjectPascal
6 lines
89 B
ObjectPascal
program for1;
|
|
var i,k,n:integer;
|
|
begin
|
|
Read(k,n);
|
|
For i:=1 to n do WriteLn(k);
|
|
end. |