Pascal a+b=c = abc примеры 099 - 0+9 = 9 199100 - 1+99 = 100 12345168 - 123+45=168 как сделать это в pascal (код)

Var chislo,chislo1,chislo2:real;Begin
readln(chislo,chislo1,chislo2);  writeln(chislo-chislo1*100-chislo2);End.