for(int i=0;i<25;i++)
{
printf("информатика \n")
}
uses crt;
var
i:integer;
begin
clrscr;
for i:=1 to 25 do writeln ('информатика');
readkey;
end.
