Tentei fazer isto no editor UAL mas da um erro "Tipo incorreto da variável s1"

Era simplesmente para o usuario deste programa informar quatro valores e o programa iria retornar com a media dos valores, mas não sei oque aconteceu fiz exatamente como a professora e não deu certo.

prog final
real s1, s2, s3, s4, media;
imprima"Digite quatros salarios: ";
leia s1;leia s2; leia s3; leia s4;
media <-(s1+s2+s3+s4)/4;
imprima"Media:", media;
fimprog