[Pascal] Qual o problema no meu codigo ??

[NewKid]

O seguinte codigo está-me a dar problemas na compilação quando chego a parte "begin" . .
Ah e é o meu primeiro programa x)

program area_triangulo;
var b, h , a: real
begin
writeIn ('Introduza o valor da base e prima enter')
readIn (b)
writeIn ('Introduza o valor da altura e prima enter')
readIn (h)
a:= b*h/2
writeIn ('A area do triangulo é' , a)
end.

EDIT: E estou a usar o Lazarus . .

 

[Armadillo]

troca os writeIn e readIn por writeLn e readLn (é com "L" e nao com "i")

 

[NewKid]

Obrigado x)
Edit : Ainda não funciona . .

 

[|-PiMpaNs-|]

boas,

rapaz e que tal pores os ; em todas as linhas de codigo.

da erro no begin porque na declaraçao das variaveis nao tem o : a fechar a linha.


seria algo do tipo isto:

program area_triangulo;
var b, h , a: real;
begin
writeln ('Introduza o valor da base e prima enter');
readln (b);
writeln ('Introduza o valor da altura e prima enter');
readln (h);
a:= b*h/2;
writeln ('A area do triangulo é' , a);
end.

cumpz.

 

[NewKid]

boas,

rapaz e que tal pores os ; em todas as linhas de codigo.

da erro no begin porque na declaraçao das variaveis nao tem o : a fechar a linha.


seria algo do tipo isto:

program area_triangulo;
var b, h , a: real;
begin
writeln ('Introduza o valor da base e prima enter');
readln (b);
writeln ('Introduza o valor da altura e prima enter');
readln (h);
a:= b*h/2;
writeln ('A area do triangulo é' , a);
end.

cumpz.

Muito obrigado pela ajuda . . É que até agora so tinha escrito pseudo codigo e não faço os ";" em pseudocodigo . .