Me ajuda nesse Algoritmo

[Poet]

Gente alguém , poderia me dizer oque esta errado nesse codigo? porque ele não execulta aqui de jeito nenhum

algoritmo "semnome"

// Função :

// Autor :

// Data : 23/04/2012

// Seção de Declarações

var

a,x : Real

b,nome1: caracter

inicio

// Seção de Comandos

Escreval ("Digite o nome do funcionario")

Leia (B )

Escreval ("Digite o salario do funcionario")

Leia (a )

Escreval ("Digite o nome do funcionario")

Leia (nome1 )

Escreval ("Digite o salario do funcionario")

Leia (x )

// comando se

se x > a então

Escreva ("Salario Do funcionario:", b "é Maior Do que o funcionario", nome1 )

senao

escreva ("Salario do funcionario:", nome1 "é maior Do que o do funcionario", B )

fimse

// fimse do comando se

fimalgoritmo

Por favor , gente me ajuda sou Iniciante e estou um pouco confuso nisso xd

vlw

Editado Abril 24, 2012 por Poet

[Jhonas]

algoritmo "semnome"
// Função :
// Autor :
// Data : 23/04/2012
// Seção de Declarações 
var
val1,val2 : Real
nome1,nome2: caracter
inicio
// Seção de Comandos
Escreval ("Digite o nome do funcionario")
Leia (nome1)
Escreval ("Digite o salario do funcionario")
Leia (val1)
Escreval ("Digite o nome do funcionario")
Leia (nome2 )
Escreval ("Digite o salario do funcionario")
Leia (val2)
// comando se
se val1 > val2 então
Escreva ("Salario Do funcionario:", nome1 " é Maior Do que o funcionario", nome2 )
senao
escreva ("Salario do funcionario:", nome2 "é maior Do que o do funcionario", nome1 )
fimse
// fimse do comando se

fimalgoritmo

OBS: voce pode acrescentar os valores dos salarios tambem se quiser

exemplo:

http://forum.clubedohardware.com.br/resolv...sor/684503?amp;

abraço