Практикум по программированию на языке Turbo Pascal. Часть 1. Портнягина В.В - 21 стр.

ляется ошибкой программирования. Вещественные значения в последнем
случае преобразовывают в целочисленные с помощью одной из предназна-
ченных для этого встроенных функций: Trunc(x) или Round(x). Операции div
и mod не могут употребляться с вещественными числами.

    4. Оператор присваивания
    Значения переменных предварительно описываются в разделе описания
переменных Var. Результаты арифметических операций, как и результаты
других операций (сравнений, логических, строковых), могут быть присвоены
какой-либо переменной с помощью оператора присваивания:
              < имя переменной > : = < значение переменной >
    Тип выражения в правой части этого оператора обязательно должен сов-
падать с типом переменной в левой части. Исключение составляют перемен-
ные вещественного типа: им могут присваиваться также значения целого типа.
    Результат работы функций сложения, умножения, деления, вычитания и
возведения в квадрат вещественных чисел дает вещественное число.

     5. Вычисление выражений
     Современные компьютеры умеют многое, но по-прежнему их можно ис-
пользовать как очень мощные калькуляторы для вычисления арифметических и
алгебраических выражений. При записи на языке программирования любое вы-
ражение должно быть «вытянуто в одну строчку», а приоритет операций регу-
лируют скобки. Рассмотрим несколько примеров записи выражений (табл. 7).

                                                                       Таблица 7

     Общематематическая запись                 Запись на Паскале
            –0,12310–7                             –0.123е–7
            456 · 1997                             456*1997
              2π +e3                              2*pi +Exp(3)
              34 ⋅ 24                           34*24/(74 + 388)
               74 + 388
             |x| + √7 + y2                  Abs(x) + Sqrt (7) + Sqr (y)
                 Sin13º                          Sin(13*Pi/180)
           log27 + lg3 + ln3            Ln(7)/Ln(2) + Ln(3)/Ln(10) + Ln(3)

    Задача 1
    Вычислить: (1,2 : 36 + 1,2 : 0,25 + Cos2) : 7,24.
    Составим программу для решения приведенного арифметического при-
мера, записывая его по правилам языка в одну строку:
    Program Lab2_1;
    Begin
    Write(1.2/36 + 1.2/0.25 + Cos(2))/7.24);
    ReadLn;
    End.
                                   21