Question

como eu faço para este algoritmo reiniciar assim que a resposta for dada

// Autor(a) :Natanael Miranda
// Data atual : 23/03/2018
Var

n1, n2, o:inteiro

r:real

Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
escreva (" escreval 1° Numero: ")

leia (n1)

escreva (" escreval 2° Numero: ")

leia (n2)

escreval ("-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-")

escreval (" Entre com uma das operaçãos abaixo ")

escreval (" 1- Soma ")

escreval (" 2- Subritação ")

escreval (" 3- Multiplicação ")

escreval (" 4- Divisão ")

escreval (" 5- Potensiação ")

escreval (" 6- Posentagen ")

escreval ("-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-")

leia (o)

escolha o

caso 1

r<-n1+n2

caso 2

r<-n1-n2

caso 3
r<-n1*n2

caso 4

r<-n1/n2

caso 5

r<-n1^n2

caso 6

r<-n1%n2

outrocaso

escreval (" Opção Invalida ")

r<-o

fimescolha

escreval (" O resultado é:",r)

Fimalgoritmo

Answer 1

toda vezes que vc quiser voltar ou reiniciar qualquer coisa no algoritmo você coloca return 0; 
esse comando e para retornar zero, TRU, FALSE  
ele finaliza.