Program primer var a integer b real begin

Примеры использования функций Program primer; var a: integer; b: real; begin write(‘a, b=‘); read(a, b); writeln(trunc(b), ‘ ‘, round(b)); if odd(a) then writeln(‘yes‘); a: =succ(a); writeln(a, ’ ’, pred(a)); end. Выполнение программы: a, b=13 7. 7 7 8 Yes 14 13

Примеры использования функций Program primer; var a: integer; b: real; begin write(‘a, b=‘); read(a, b); writeln(trunc(b), ‘ ‘, round(b)); if not odd(a) then writeln(‘yes‘); a: =succ(a); writeln(a, ’ ’, pred(a)); end. Выполнение программы: a, b=13 7. 7 7 8 14 13