Question

Faça um algoritmo que digite o nome e idade de duas pessoas. Encontre e imprima a diferenças de idades entre as pessoas. E a soma das idades das pessoas.

Answer 1

Program Inicio ;var nome1,nome2:string;var idade1,idade2,soma,diferenca1,diferenca2:integer;BeginWrite ('Digite o nome da primeira pessoa.');Writeln();read(nome1);Write ('Digite o nome da segunda pessoa.');Writeln();read(nome2);Writeln();Write ('Qual é a idade de ',nome1,'?');Writeln();read(idade1);Write ('Qual é a idade de ',nome2,'?');Writeln();read(idade2);diferenca1:=idade1-idade2;// Diferença da idade de nome1 pra nome2diferenca2:=idade2-idade1;// Diferença da idade de nome2 pra nome1Writeln();if (idade1>idade2) then //Se idade1 for maior que a idade2 vai imprimir...  Write ('',nome1,' é mais velho que ',nome2,' sua idade é ',idade1,'!')else//Se idade2 for maior que a idade1 vai imprimir...  Write ('',nome2,' é mais velho que ',nome1,' sua idade é ',idade2,'!');  Writeln(); // fim do primeiro elseif (idade1>idade2) then //comparação  Write ('A diferença é de ',diferenca1,' anos mais velho que ',nome2,'!')else  Write ('A diferença é de ',diferenca2,' anos mais velho que ',nome1,'!');Writeln();soma:=idade1+idade2;Write ('A soma das duas idades é ',soma,'');readln();End.