program Wages(output);
var
Wages,HoursWorked,PayRate:integer;
begin
write('Please enter the HoursWorked:');
readln(HoursWorked);
write('Please enter the PayRate:');
readln(PayRate);
Wages:=HoursWorked*PayRate;
writeln('Wages=$',Wages);
readln
end.
請問為何這程式不能順利編譯?我若改了程式名稱又行?