Блок - схема Калькулятора Делфи

[malicious_devil]

[procedure TForm1.Button15Click(Sender: TObject); // клавиша равно
begin
p2:=StrToFloat(Edit1.Text); //сохраняем значение дробей в переменных
case znak of // цикл выбора действия и выполнение действия
'+': itog:=p1+p2; //сложение
'-': itog:=p1-p2; //вычитание
'*': itog:=p1*p2; //умножение
'/': begin
if p2=0 then //если 2е число равно нулю тогда
begin
ShowMessage('Нельзя делить на ноль');
exit;
end
else // иначе
itog:=p1/p2; //деление
end;
end; //конец цикла
Edit1.Clear; //очищаем поля ввода
Edit1.Text:=FloatToStr(itog); //выполнение операции и вывод рез-та
end; //конец процедуры]

Помогите исправить блок-схему по коду (до линия правильно)

[doktor255]

Для меня не понятно, что за линия в блок схеме "выбираем знак"

[malicious_devil]

Выбрали числа p1 и p2 и знак между ними, когда нажимаем равно и все присваивается в p1. После этого либо выход,либо выбираем знак.