HP SunSoft Pascal 4.0 Uživatelský manuál Strana 214

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 333
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 213
190 Pascal 4.0 Users Guide
8
The following example illustrates this method:
The Pascal program, sun.pas program Test(input,output);
var
s : string;
procedure mygrout_(var prompt :string; length :integer32); external;
begin
writeln('Starting...');
s := 'Trio Jeepy';
mygrout_(s, 8);
writeln('Ending...')
end.
The FORTRAN subroutine,
mygrout.f
subroutine MyGrout(N)
character*(*)N
write(6,*) N
return
end
The commands to compile and
run this program
hostname% pc -g -c sun.pas
hostname% f77 -g sun.o mygrout.f -lpc
mygrout.f:
mygrout:
hostname% a.out
Starting...
Trio Jee
Ending...
Zobrazit stránku 213
1 2 ... 209 210 211 212 213 214 215 216 217 218 219 ... 332 333

Komentáře k této Příručce

Žádné komentáře