Занятие 2: Арифметические операции с целыми числами

На занятии знакомимся с арифметическими операциями:

• Присваивание:’:=’
• Сложение: "+”
• Увеличение: "inc”
• Вычитание: "-”
• Уменьшение: "dec”
• Умножние: "*”
• Целочисленное деление: "div”
• Остаток от деления: "mod”

и учимся рассчитываем математические формулы…

Программа №1: Арифметические операции

// Занятие #002

// Арифметическим операции над целыми числами

var

   a,b,c : integer;

begin

 

    a:=8;             // Операция присваивания

    b:=3;

    c:=a+b;           // Сложение

    writeln('Результат сложения:', c);

 

    Inc(c);         // Увеличение на 1

    writeln('Результат увеличения на 1:', c);

 

    c:=a-b;           // Вычитание

    writeln('Результат вычитания:', c);

 

    Dec(c);           // Уменьшение на 1

    writeln('Результат уменьшения на 1:', c);

 

    c:=a*b;          // Умножение

    writeln('Результат умножения:', c);

 

    c:=a div b;      // Целочисленное деление

    writeln('Результат деления:', c);

 

    c:=a mod b;      // Остаток от деления

    writeln('Остаток от деления:', c);

 

end.

Программа №2:Расчет формул

Обратите внимание: в Pascal ABC нет операции возведение в степень,  поэтому воспользуемся многократным умножением.

// Занятие #002

// Расчет формул

var

   a,b,c : integer;

begin

 

    a:=8;

    b:=3;

    c:=a*a+a*b-2*b;

    writeln('Расчет формулы a^2+a*b-2*b:', c);

 

    c:=2*a*a*a-2*a*b*b-2*b;

    writeln('Расчет формулы 3*a^3-2*a*b^2-2*b:', c);

end.