program reussite;
uses wincrt;
var
i:integer;
BEGIN
Writeln(':::::::::::::::::::::::::::::::Section science del''informatique ::::::::::::::::::::::');
for i:=1 to 21 do
begin
Writeln('Elève N°' ,i, ' Admis, Mention = Excellent ');
end;
Writeln(':::::::::::::::::::::::::::::::A dieu les années lycée, Bienvenue les années Faculté ::::::::::::::::::::::');
END.
uses wincrt;
var
i:integer;
BEGIN
Writeln(':::::::::::::::::::::::::::::::Section science del''informatique ::::::::::::::::::::::');
for i:=1 to 21 do
begin
Writeln('Elève N°' ,i, ' Admis, Mention = Excellent ');
end;
Writeln(':::::::::::::::::::::::::::::::A dieu les années lycée, Bienvenue les années Faculté ::::::::::::::::::::::');
END.
.. . ..... .. ... .. . . .
.. . ..... .. ... .. . . .
!. . ..... .. ... .. . . .
© Forza Bac Info
.. . ..... .. ... .. . . .
!. . ..... .. ... .. . . .
© Forza Bac Info
