Pascal record
- Szczegóły
- Kategoria: Pascal
- Opublikowano: poniedziałek, 29, sierpień 2011 16:47
- ber3333
- Odsłony: 58973
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.
