Bą tpx.exe
File Edit Search Run Compile Debug Tools Options
n=E" 1=
\DOCUME~1\WJEK~1.WOL\PULPIT \ZA DA NIE5. P A S
program zadańie5; uses crt;
type
rr=^rek; rek = record a:word; b:integer; c:char; d:string end;
S :rr;
procedurę wypelnienie<var x:rr>; var a:byte; begin new<x>; with x" do 1:1 =
T
FI Help F2 Saoe F3 Open Alt+F9 Compile F9 Make Alt+F10 Local menu