Pascal/Variáveis Compostas Homogêneas Multidimensionais: diferenças entre revisões
< Pascal
[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.