Program N; var a: integer; begin write ('Введите целое число: '); readln(a); if a = 0 then writeln ('ноль') {если введённое число равно 0, то вывести соответствующее сообщение} else if a = 1 then {иначе если данное число равно 1, то вывести соответствующее сообщение} writeln ('один') else if a = 2 then writeln ('2') {иначе если данное число-2, то вывести соответствующее сообщение} else writeln ('неизвестное число'); {иначе число незивестное} readln end.
ЖИЗНЕННОЙ, СИТУАЦИИ, ПОНАДОБЯТСЯ, ВЫЧИСЛИТЕЛЬНЫЕ Будешь писать неграмотно лично я и отвечать не буду - обидно за русский язык!! Вычислительными будем называть такие таблицы, в которых значения некоторых свойств вычисляются с использованием значений других свойств из этой же таблицы. Вычислительная таблица может содержать итоговую строку (графу). Итоговая строка (графа) имеет заголовок «Итого» или «Всего». В ячейках итоговой строки (графы) размещают суммы чисел из соответствующих граф (строк). Важно, чтобы эти суммы имели смысл.
Деревья строятся просто: добавляем узел – операцию, которая выполняется последней, и к ней два потомка – аргументы этой операции. Например, для выражения a + b операцией будет "+", а аргументами – a и b. Затем в таком же виде представляем аргументы этой операции, пока все аргументы не будут содержать выражений. Построенные деревья во вложении.
Префиксная форма записи заключается в том, что сначала записывается операция, потом префиксная запись её первого аргумента, потом второго аргумента. Это соответствует обходу дерева сверху вниз и слева направо, записываем, что сверху, потом идем вниз. Вот что получится в итоге: а) * + a b + c * 2 d б) + * - * 2 a * 3 d c * 2 b в) - * 3 a * + * 2 b c d
В постфиксной записи, наоборот, записываются сначала аргументы, потом операция. Это соответствует обходу дерева снизу-вверх. а) a b + c 2 d * + * б) 2 a * 3 d * - c * 2 b * + в) 3 a * 2 b * c + d * -
var a: integer;
begin
write ('Введите целое число: ');
readln(a);
if a = 0 then writeln ('ноль') {если введённое число равно 0, то вывести соответствующее сообщение}
else if a = 1 then {иначе если данное число равно 1, то вывести соответствующее сообщение}
writeln ('один')
else if a = 2 then writeln ('2') {иначе если данное число-2, то вывести соответствующее сообщение}
else writeln ('неизвестное число'); {иначе число незивестное}
readln
end.