fork download
  1. Program opdracht9 ;
  2.  
  3. var
  4. Getal1 ,Getal2 ,Getal3 ,kleinste , middel ,grootste: Integer;
  5.  
  6. begin
  7. Writeln ('Geef een heel getal ') ;
  8. Read (Getal1) ;
  9. Writeln (' Geef nog een heel getal ') ;
  10. Read (Getal2) ;
  11. Writeln (' Geef nog een heel getal ') ;
  12. Read (Getal3) ;
  13. If Getal1<=Getal2 Then kleinste :=Getal1 Else kleinste :=Getal 2 ;
  14. If Getal3<=kleinste Then kleinste :=Getal3 ;
  15. If Getal1>=Getal2 Then grootste :=Getal1 Else grootste := Getal2;
  16. If Getal3>=grootste Then grootste :=Getal3 ;
  17. If Getal1<=Getal2<=Getal3 Then Getal2 :=middel ;
  18. If Getal2<=Getal3<=Getal1 Then Getal3 :=middel ;
  19. If Getal3<=Getal1<=Getal2 Then Getal1 :=middel ;
  20. Writeln (‘ Dus de volgorde is ‘ kleinste ‘en’ middel ‘en’ grootste) ;
  21. end.
  22.  
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
prog.pas: In main program:
prog.pas:13: error: undeclared identifier `Getal' (first use in this routine)
prog.pas:13: error:  (Each undeclared identifier is reported only once
prog.pas:13: error:  for each routine it appears in.)
prog.pas:13: error: syntax error before `2'
stdout
Standard output is empty