Atps algoritmos e programação (portugol)

1)Faça um algoritmo que receba um número e mostre uma mensagem caso este número seja maior que 10.
VARIAVEIS
NUMERO: REAL;
INICIO
ESCREVA(“DIGITE UM NUMERO: ”);
LEIA(NUMERO);
SE NUMERO>10
ESCREVA(“O NUMERO DIGITADO É MAIOR QUE 10”);
FIMSE;
FIM;
------------------------------------------------------------------------------------------------------------------------------
2)Escrever um algoritmo que leia dois valores inteiros distintos e informe qual é o maior.
VARIAVEIS
VALOR1, VALOR2: INTEIRO;
INICIO
ESCREVA(“DIGITE O PRIMEIRO VALOR: ”);
LEIA(VALOR1);
ESCREVA(“DIGITE O SEGUNDO VALOR: ”);
LEIA(VALOR2);
SE VALOR1 > VALOR2
ESCREVA(“O MAIOR NUMERO É: ”);
LEIA(VALOR1);
FIMSE;
SE VALOR1< VALOR2
ESCREVA(“O MAIOR NUMERO É: ”);
LEIA(VALOR2);
FIMSE;
SENAO
ESCREVA(“O VALORES SÃO IGUAIS”);
FIMSE;
FIM;
------------------------------------------------------------------------------------------------------------------------------
3) Faça um algoritmo que receba um número e diga se este número está no intervalo entre 100 e 200.
VARIAVEIS
NUMERO: REAL;
INICIO
ESCREVA(“DIGITE UM NUMERO: ”);
LEIA(NUMERO);
SE NUMERO>=100 E NUMERO <=200
ESCREVA(“O NUMERO SE ENCONTRA ENTRE O INTERVALO DE 100 A 200”);
FIMSE;
SENAO
ESCREVA(“O NUMERO NAO SE ENCONTRA ENTRE O INTERVALO DE 100 A 200”);
FIMSE;
FIM;
------------------------------------------------------------------------------------------------------------------------------
4)Escrever um algoritmo que leia o nome e as três notas obtidas por um aluno durante o semestre. Calcular a sua média (aritmética), informar o nome e sua menção: Aprovado (media >= 7), Reprovado (media <= 5) e Recuperação (media entre 5.1 a 6.9).
VARIAVEIS
NOTA1, NOTA2, NOTA3, MEDIA: REAL;
NOME: CARACTER;
INICIO
ESCREVA(“DIGITE O NOME DO ALUNO: ”);
LEIA(NOME);
ESCREVA(“INFORME A PRIMEIRO NOTA: ”);
LEIA(NOTA1);
ESCREVA(“INFORME A SEGUNDA NOTA: ”);
LEIA(NOTA2);
ESCREVA(“INFORME A TERCEIRA NOTA: ”);