Step-93

Добрый день, буквально 2 месяца изучаю программирование(Паскаль). Самостоятельно, так как в школе ничему подобному не учат.
Написал прогу "Калькулятор(простой)". Мне бы хотелось чтобы вы оценили его и сказали что в коде лишнее или что следует добавить .

Вот код порграммы :

__________________________________________________ ___________________________________

program Calculator;
uses crt;
label metka;

var a,b,sum:real;
simbol1,simbol2,simbol3:char;

BEGIN
clrscr;
writeln;
writeln('Введите действие. Например: "5 + 3"(через пробел,ковычки не ставить) ');

writeln;
writeln;
metka: readln(a,simbol1,simbol2,simbol3,b);

writeln;

case simbol2 of
'+':sum:=a+b;
'-':sum:=a-b;
'*':sum:=a*b;
'/':sum:=a / b;
else begin
writeln('Некорректно введено действие. Введите правильно:');
goto metka;
end;
end;
writeln('Ответ:',sum:6:2,'.' );
writeln;
writeln('***************************************** *******************************');
readln;



END.
__________________________________________________ _____________________________________

monte-kristo

Step-93, во первых этому учат!
Во вторых лучше предоставте exe)

Step-93

monte-kristo, нет,паскаль мы не учим

---------- Добавлено в 17:07 ---------- Предыдущее сообщение было написано в 17:04 ----------

вот ссылочка : http://slil.ru/28514665

Nikolos

Step-93,для простого вроде бы все есть, а лишнего нет(код, с моей 64 битной Windows 7, exe Ваш не совместим ), главное что бы работал

Step-93

Nikolos, я его впринципи испытывал с разными числами. Не подводил пока)

---------- Добавлено в 17:11 ---------- Предыдущее сообщение было написано в 17:09 ----------

Вот у меня есть еще вопрос:
как сделать чтобы юзер мог вводить действие без пробела а не так как есть сейчас??