Algoritmo para ler três números inteiros e escrever a média dos números lidos

// Faça um algoritmo para ler três números inteiros e escrever a média dos números lidos


program Media_de_tres_numeros;

var numero1,numero2,numero3,media:integer;

begin

writeln('digite 1 numero');

readln(numero1);

writeln('digite outro numero');

readln(numero2);

writeln('digite mais outro numero');

readln(numero3);

writeln('a media dos 3 numeros sao:',(numero1+numero2+numero3)/3);

readln(media);

end.