Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- algoritmo "4_18"
- declare n, t:inteiro;
- escreva("Informe um número inteiraço: ");
- leia(n);
- t <- 1;
- t <- n*(n+1)/2;
- escreval(t);
- fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement