ошибка в турбо паскале

Question

пишу программу: var a,c,d: integer; b: char; begin 
readln(a); 
readln(b); 
case b of 
'+': begin d:=a+c; writeln(d) end; 
end; 
readln(c); 
readln; 
end. 
Турбо паскаль мне выдает: "ошибка № 106, ошибочный числовой формат". Как ее исправить? Курсор показывает на readln(a);

Станислав · Accepted Answer

Программа абсолютно бессмысленна, но при этом работает:

Возможно, ты хотел написать что-то типа такого: var a, c, d: integer; b: char; begin readln(a); readln(c); readln(b); case b of '+': begin d := a + c; writeln(d) end; '-': begin d := a - c; writeln(d) end; end; readln; end.

но как-то не удалось...