elmah
Nowy
Dołączył: 01 Cze 2015
Posty: 1
Przeczytał: 0 tematów
Ostrzeżeń: 0/5
|
 Wysłany: Pon 20:30, 01 Cze 2015 Temat postu: Przeliczanie walut |
|
|
Witam
Mam program do przeliczania walut. W 12 linii wyświetla się błąd
| Cytat: | match
source.pas(12,3) Error: Constant Expression expected
source.pas(12,3) Fatal: Syntax error, ":" expected but "identifier EURO" found
Fatal: Compilation aborted
Error: C:\TPF\ppc386.exe returned an error exitcode (normal if you did not specify a source file to be compiled)
|
Co może być źle ?
| Kod: | Program Pieniadze;
uses crt;
var waluty,zlotowki,euro,dollary:Word;
begin
clrscr;
Writeln('Wybierz walute 1-zlotowki 2-dollary 3-euro');
writeln('Wcisnij 1,2 lub 3');
CASE waluty OF
1:
writeln('Podaj zlotowki=');
readln(zlotowki)
euro:=zlotowki/4.12;
writeln('euro=');
dollary:=zlotowki/3.75;
writeln('dollary=');
end
2:writeln'Podaj euro');
readln(euro);
zlotowki:=euro*4.12;
writeln('zlotowki=');
dollary:=euro*0.92;
writeln('dollary=');
3:writeln('Podaj dollary');
readln(dollary)
zlotowki:=dollary*3.75;
writeln('zlotowki=');
euro:=dollary*1.09;
writeln('euro=');
end;
repeat untill keypressed;
end. |
Post został pochwalony 0 razy
|
|
