Ik heb de volgende code
Deze wilt onder mijn Dev-pascal niet werken omdat ie dan geen crt.pas kan vinden.
De message die ik dan krijg is:
Warining: Illegal compiler directive $GNU
Fatal: Can't find unit GPC
Unit is crt.pas
En als ik dan "uses crt;", "Gotoxy (1,10)" en "Clrscr" weglaat doet ie het perfect.
=Edit=
Onder TurboPascal 5.5 wilt ie het wel doen. De "uses crt" dan maar ik wil het onder dev-pascal hebben.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
| Program Opdr8; uses crt;
var Bedrag, Aantal :longint;
Begin
clrscr;
gotoxy(1,10);
Write (Output, 'Voer nu het bedrag in centen: ');
Readln (Bedrag);
Aantal := Bedrag div 50000 ;
Writeln (Output, Aantal, ' biljetten van 500,-');
Bedrag := Bedrag mod 50000;
etc....
Aantal := Bedrag div 1 ;
Writeln (Output, Aantal, ' Munten van 0,01');
Bedrag := Bedrag mod 1;
readln;
end. |
Deze wilt onder mijn Dev-pascal niet werken omdat ie dan geen crt.pas kan vinden.
De message die ik dan krijg is:
Warining: Illegal compiler directive $GNU
Fatal: Can't find unit GPC
Unit is crt.pas
En als ik dan "uses crt;", "Gotoxy (1,10)" en "Clrscr" weglaat doet ie het perfect.
=Edit=
Onder TurboPascal 5.5 wilt ie het wel doen. De "uses crt" dan maar ik wil het onder dev-pascal hebben.
[ Voor 12% gewijzigd door Verwijderd op 23-09-2003 15:25 ]