Pascal/Variáveis Compostas Homogêneas Multidimensionais: diferenças entre revisões

Origem: Wikilivros, livros abertos por um mundo aberto.
[edição não verificada][edição não verificada]
Conteúdo apagado Conteúdo adicionado
pascal
 
Sem resumo de edição
Linha 1: Linha 1:
programa feito Por Victor Martins
programa feito Por Victor Martins


<source lang=pascal>

program aparecenome;
program aparecenome;
var
var
Linha 27: Linha 27:
end.
end.
</source>

Revisão das 20h29min de 20 de setembro de 2017

programa feito Por Victor Martins

program aparecenome;
var 
    Nome1 , Nome2 : string;
    n1 ,     n2   : integer;
     begin
          write('informe os nomes desejados ');
          writeln; 
      		readln(nome1);
          writeln ('e') ;
          readln (nome2);
          writeln;
          writeln('Agora informe a idade do ',nome1 );
					readln (n1);
					writeln; 
          writeln('Agora informe a idade do ',nome2 );
				  readln (n2);
					writeln;
					writeln;
				  writeln ( 'Seu nome e ', nome1 ,' e voce tem ' , n1 , ' anos de idade ' ) ;
				  write ( 'e ', nome2 ,' tem ' , n2 , ' anos de idade ' ) ;
					readln;
				  readln;
    
    
    end.