Question

Algoritimo em Pascal
Escreva um algoritmo para ler um valor e escrever a mensagem ‘É maior que 10 ‘ se o valor lido for maior que 10, caso
contrário escrever ‘NÃO é maior que 10’.

Answer 1

{Escreva um algoritmo para ler um valor e escrever a mensagem ‘É maior que 10 ‘ se o valor lido for maior que 10, caso contrário escrever ‘NÃO é maior que 10’.}

Program ex_03IF ;
var
n:integer;
Begin
writeln('Escreva um número');
read(n);
if n > 10 then
write('É maior que 10')
else  
write('NÃO é maior que 10');
End.