Ответы
Ответ дал:
0
Var
N:integer;
Begin
Write('N = ');ReadLn(N);
For N:= 1 to N do
Write('*')
End.
N:integer;
Begin
Write('N = ');ReadLn(N);
For N:= 1 to N do
Write('*')
End.
Вас заинтересует
2 года назад
6 лет назад
6 лет назад
9 лет назад