Исходник калькулятора для паскаля, который умеет складывать, вычитать, умножать, а также делить в обычном и привычном для нас виде и в целых числах с остатком. Использованы операторы mod и div, +, -, /, *. Имеет не скомпилированный формат для редактирования .pas. Открывается в таких программах, как Pascal ABC, Pascal ABC.Net и Turbo Pascal. В программе есть пояснительные комментарии к каждой строке.
Исходный код программы на Паскаль:
var a, b, sum, raz, pro, c: integer;
del: real;
begin
readln (a, b); // считываем два числа
sum:=a+b; // складываем числа
raz:= a-b; // вычтаем
pro:=a*b; // умножаем
del:=a/b; // выполняем простое деление
c:=a div b; //делаем целочисленное деление
a:= a mod b; // находим остаток, при этом меняем значение a
writeln ('сумма - ', sum); // выводим сумму
writeln ('разность - ', raz); // выводим разность
writeln ('произведение - ', pro); // выводим произведение
writeln ('простое деление - ', del); // выводим обычное деление
writeln ('целочисленное деление - ', c); // выводим результат целочисленного деления
writeln ('остаток - ', a); // выводим остаток
end.
del: real;
begin
readln (a, b); // считываем два числа
sum:=a+b; // складываем числа
raz:= a-b; // вычтаем
pro:=a*b; // умножаем
del:=a/b; // выполняем простое деление
c:=a div b; //делаем целочисленное деление
a:= a mod b; // находим остаток, при этом меняем значение a
writeln ('сумма - ', sum); // выводим сумму
writeln ('разность - ', raz); // выводим разность
writeln ('произведение - ', pro); // выводим произведение
writeln ('простое деление - ', del); // выводим обычное деление
writeln ('целочисленное деление - ', c); // выводим результат целочисленного деления
writeln ('остаток - ', a); // выводим остаток
end.
Скачать: mini-kalkulyator-bez-vybora.pas
Все исходники наиболее простых программ на одно действие находятся в категории исходники также, как и эта новость.