Неполучается решить по выдаёт тип то что 'встречено else,а ожидался оператор 'всё кто знает скажите program komp; var a,b : integer; x,s,k : string; begin writeln('введите своё имя: '); readln(x); if x = 'антон' then writeln('добро , антон! '); writeln('выбирите действие: '); writeln('калькулятор'); readln(s); if s = 'калькулятор' then writeln('выбирите знак(+/,*): '); readln(k); begin begin if k = '+' then writeln('введите пример: '); readln(a,b); writeln('ответ: ', a+b) else if k = '-' then writeln('введите пример: '); readln(a,b); writeln('ответ: ', a-b) else if k = '*' then writeln('введите пример: '); readln(a,b); writeln('ответ: ', a*b) else if k = '/' then writeln('введите пример: '); readln(a,b); writeln('ответ: ', a/b); end; end. программа не