Question

LINGUAGEM PASCAL- AJUDA

escrever um programa que leia 5 números. Ao final imprima como resultado a soma dos valores lidos.

Answer 1

Var n1, n2, n3, n4, n5, TOT: REAL;

Begin

write ('Digite um número');

read (n1);

write ('Digite outro número');

read (n2);

write ('Digite outro número');

read (n3);

write ('Digite outro número');

read (n4);

write ('Digite outro número');

read (n5);

TOT:= n1+n2+n3+n4+n5;

write (TOT);

END