Question

ajutor, Urgent
la informatică​

Answer 1

program ex;

var

 n, i: integer;

begin

 writeln('Introduceti n: ');

 readln(n);

 i := 1;

 for i := 1 to n do writeln('Informatica');

end.