Algoritmo para ler um número inteiro e informar se este é maior que 10.

//Faça um algoritmo para ler um número inteiro e informar se este é maior que 10.

program numero_maior_que_10;

uses crt;

var numero:integer;

begin

writeln('escreva um numero');

readln(numero);

if(numero>10) then

writeln('e maior que 10!!!!!!');

readkey ;

end.