Pascal record

Record możemy zdefiniować w następujący sposób.

Jest to zbiór danych o różnym charakterze i różnej długości znaków,  używanym jako jednej całości, z której możemy wyciągać poszczególne dane, w momencie  potrzebnym użytkownikowi.

program record_osoba;
uses
crt;
 
type
tosoba=record
imie,nazwisko: string;
tmiara: byte;
end;
 
var
i: byte;
para: tosoba;
 
begin
clrscr;
 
for i:=1 to 2 do 
begin
writeln('Podaj Imie');
readln(para.imie);
writeln('Podaj Nazwisko');
readln(para.nazwisko);
writeln('Podaj Wzrost');
readln(para.tmiara);
writeln('Podany wzrost ', para.imie,para.nazwisko,' wynosi ',para.tmiara,'cm');
end;
readln;
end.

• « poprz.
• nast. »