z komentarzem 5 2 bmp

Bą tpx.exe

File Edit Search Run Compile Debug Tools Options Mindow Help

=[■]    \D0CUME~1\UJEK~1.U0L\PULPIT\ZADANIES.PAS =

with do begin

readln<a>; readln<b>; readln<c>; readln<d>; end; end;

<procedura wyświetlająca rekord! procedurę wyswietlenie<var x:rr>; uar

i:byte; begin

with x" do begin

writeln<^ł '!; writeln<a>; writeln<b>; writeln<c>; writeln<d>;

dispose<x>    {zwolnienie zarezerwowanej pamięci!

28:73 =<□■

FI Help F2 Saue F3 Ópen Alt +F9 Compile P9 Make Alt+F10 Local menu