Jump to content


boss-777

Member Since 10/08/2009
Offline Last Active 11/08/2009, 10:51
-----

Topics I've Started

Preisiso De Ajuda Em Pascal

10/08/2009, 14:10

eu presiso guardar 3 tipos de dados numa sou varivel na matriz...tentei assim nao da...max com 2 colunas funsiona..


program save_nome_numero_bi;
uses crt;
type

formandos = record
nome:string[50];
idade:byte;

end;

var
np:byte;
i:integer;
l:real;
alunos:array[1..10,1..10] of formandos;

begin
writeln('inntruza quantas pessos quer inserir');
readln(np);
clrscr;
for i:=1 to 2 do

begin
writeln('intruza o ' , i , ' nome ');
readln(alunos[i,1].nome);
writeln('Introduza a idade dessa pessoa' , i);
readln(alunos[i,2].idade);
clrscr;
end;

for i:=1 to 2 do
begin
writeln('os nome que forom introduzidos ',alunos[i,1].nome, ' idade e ' ,alunos[i,2].idade );
readln;

end;
end.

IPB Skin By Virteq