cucas polecil bym ci robic wciacia zeby kod programu byl bardziej przejrzysty, bo to co ty napisales jest straszne
powinno to tak wygladac, z poprawkami jak slysznie je podal Fleja
program program001;
uses crt;
begin
clrscr;
write('Prosty program');
readln;
end.