Exemples

Voici un exemple de programmes en Pascal


Le programme demande à l'utilisateur des nombres entiers. Le programme s'arrêtera lorsqu'il rencontrera le nombre 1.




program ex;
uses crt;
var nombre : integer;
begin
clrscr;
repeat;
writeln(' donne-moi un nombre entier');
   readln (nombre);
until nombre=1;
readln;
end.