Question

Desenvolva um diagrama que Leia 4 (quatro) números, Calcule o quadrado de cada um (x 2 ), se o valor resultante do quadrado do terceiro for >= 1000, imprima-o e finalize, caso contrário, imprima os valores lidos e seus respectivos quadrados.

Answer 1

Resposta:

INÍCIO CalculaQuadrados

 var

   n1, n2, n3, n4: real;

   quadrado1, quadrado2, quadrado3, quadrado4: real;

 Ler(n1);

 Ler(n2);

 Ler(n3);

 Ler(n4);

 quadrado1 <- n1 * n1;

 quadrado2 <- n2 * n2;

 quadrado3 <- n3 * n3;

 quadrado4 <- n4 * n4;

 SE quadrado3 >= 1000 ENTÃO

   Imprimir(quadrado3);

 SENÃO

   Imprimir ("O quadrado de ", n1, " é igual ", quadrado1);

   Imprimir ("O quadrado de ", n2, " é igual ", quadrado2);

   Imprimir ("O quadrado de ", n3, " é igual ", quadrado3);

   Imprimir ("O quadrado de ", n4, " é igual ", quadrado4);

FIM-SE

FIM