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.

Używamy cookies i podobnych technologii m.in. w celach: świadczenia usług, reklamy, statystyk. Korzystanie z witryny bez zmiany ustawień Twojej przeglądarki oznacza, że będą one umieszczane w Twoim urządzeniu końcowym. Pamiętaj, że zawsze możesz zmienić te ustawienia. To find out more about the cookies we use and how to delete them, see our privacy policy.

I accept cookies from this site.

EU Cookie Directive Module Information