ответ 51. И так, вам ввели начальные значения переменных. Вас требуют проверить два условия. Если результатом его проверки будет true(т.е. истина, а истина в данном случае будет, только если оба условия будут истинными) то вы должны выполнить следущие действия: x=3*a+2*b+c, если результатом проверки логических выражений будет false(т.е. ложь, а ложь в данном случае будет при условии, что хотя бы 1 из данных логических выражений ложное, ну или оба выражения ложные), то тогда вы выполняете это: x=5*a-b+c. И так, выполняем алгоритм 10>5 и 5>6? Нет, т.к. второе условие не выполняется. Значение логического выражения false, значит выполняем действия по ветке else(иначе), x=5*10-5+6=51 Всё. На экран выведится число 51. маловато для такого развёрнутого объяснения, так что отметьте хотя бы как лучший ответ \_(•_•)_/
Case понимает только integer, т.е можно написать: case A of 1 : bla 2 : bla-bla end; такое выражение выдаст ошибку: case A of 'sin' : bla 'cos' : bla-bla end; т.к в данном случае используется string вместо integer; если делается калькулятор в одно действие (число - знак - число, пример: 2 + 3), то можно сделать так: if znak = 'sin' then result := sin(number) else if znak = 'cos' then result := cos(number) ... (другие условия) Если же создаётся калькулятор с неограниченным числом параметров (2 + 5 * 4 / 5), то имеет смысл найти парсинга математических выражений Вроде всё
var num : integer; begin readln(num); case num of 1 : bla (понедельник) 2 : bla-bla (вторник) ... 6 : bla-bla-bla (суббота) end; end.
если так вопрос стоял)