Osgarmo's Live

- Intão Agora qui nos tem um pc-zão tá na hora de voltar pra facul.... Vai-se-FODA....
Como faço Processamento de Dados ... e como aprendi a programar em PASCAL ... resta-me digitar o seguinte programa em pascal:
Program Facul;
var
EU = Char;
Facul = Char;
begin
Writeln ( 'digite valor para EU que só pode ser 450');
Read (EU);
Writeln ( 'Digite valor pra FACUL que só pode ser 0');
Read (Facul );
if EU = 450 , Facul=0 then
Eu=0, Facul=450;
Writeln ( 'Ói eu Di novo sem dinheiro pra nada');
End.