Приложение 'Калькулятор'

Приложение 'Калькулятор'

Содержание

1. Постановка задачи

2. Определение свойств и методов         

3. Текст программы

4. Результат работы программы

5. Блок-схема

Список литературы

1. Постановка задачи

Разработать структуру объекта «Калькулятор». Объект должен содержать не менее 5 методов и не менее 3 свойств. Разработать программу моделирования работы объекта.

. Определение свойств и методов

Калькуля́тор (лат. calculātor «счётчик») - электронное вычислительное устройство для выполнения операций над числами или алгебраическими формулами.

Калькулятор заменил ручные (механические) вычислительные устройства и приспособления, такие как абаки, счёты, математические таблицы (прежде всего - таблицы логарифмов), логарифмические линейки, механические или электромеханические арифмометры.

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

По исполнению калькуляторы могут быть настольными или компактными (карманными). Отдельные модели имеют интерфейсы для подключения персонального компьютера, печатающего устройства, внешнего модуля памяти или иных внешних устройств. Существуют калькуляторы, встроенные в персональные компьютеры, сотовые телефоны, КПК и даже наручные часы. Специализированные калькуляторы встраиваются в бытовую технику (например, простой медицинский калькулятор может встраиваться в спортивный тренажёр).

Для калькулятора примем следующее:

калькулятор вычислительный программа

3. Текст программы

Unit1;

interface, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, ExtCtrls;Tcalc = class

private:boolean;{true - включен, false - выключен},regB:real; {регистры для хранения чисел}:integer;{Код ошибки 0 - все ОК, 1 - деление на 0, 2 - переполнение}

errors:array[0..2] of string;Start;{Включить}Stop;{Выключить}

TForm1 = class(TForm): TPanel;: TMemo;: TButton;: TButton;Button2Click(Sender: TObject);Button1Click(Sender: TObject);

{ Private declarations }

{ Public declarations };: TForm1;

{$R *.dfm}Tcalc.clear;

begin:=0;:=0;:=0;;

procedure Tcalc.Start;{Включить}:=true;;;Tcalc.Stop;{Выключить};:=false;;Tcalc.add;:=regA+regB;;Tcalc.mult;:=regA*regB;;Tcalc.sub;:=regA-regB;;Tcalc.divide;

if regB<>0 then regA:=regA/regB

else error:=1;;

procedure TForm1.Button2Click(Sender: TObject);

begin;;

procedure TForm1.Button1Click(Sender: TObject);

var calc:Tcalc;:integer;

memo1.Lines.Clear;:=Tcalc.Create;.regA:=10;.Lines.Add('В регистре А - '+floattostrF(calc.regA,ffFixed,5,3));.regB:=-4.5;.Lines.Add('В регистре B - '+floattostrF(calc.regB,ffFixed,5,3));.Lines.Add('Сложение');.add;.Lines.Add('В регистре А - '+floattostrF(calc.regA,ffFixed,5,3));.Lines.Add('В регистре B - '+floattostrF(calc.regB,ffFixed,5,3));.Lines.Add('Вычитаение');.sub;.Lines.Add('В регистре А - '+floattostrF(calc.regA,ffFixed,5,3));.Lines.Add('В регистре B - '+floattostrF(calc.regB,ffFixed,5,3));.Lines.Add('Умножение');.mult;.Lines.Add('В регистре А - '+floattostrF(calc.regA,ffFixed,5,3));.Lines.Add('В регистре B - '+floattostrF(calc.regB,ffFixed,5,3));.Lines.Add('Деление');.divide;.Lines.Add('В регистре А - '+floattostrF(calc.regA,ffFixed,5,3));.Lines.Add('В регистре B - '+floattostrF(calc.regB,ffFixed,5,3));

calc.Destroy;;.

. Результат работы программы

. Блок-схема

Tshaver.SetSpeed(s:integer);:=speed+s;speed<100 then speed:=100;speed>maxspeed then speed:=maxspeed;

end;

1. Алгоритмы и структуры данных с примерами на Паскале / Н. Вирт; пер. с англ. Д.Б. Подшивалова. - 2-е изд. - СПб.: Невский диалект, 2007. - 352 с.

. Маркова Т.Н. Основы программирования: учеб. пособие / Т.Н. Маркова. - Тула: Изд-во ТулГУ, 2009. - 106 с.

. Фаронов В.В. Delphi. Программирование на языке высокого уровня: учебник для вузов / В.В. Фаронов. - М.[и др.]: Питер, 2007. - 640 с.

. Хомоненко А.Д. Delphi 7: [наиболее полное руководство] / А.Д.Хомоненко [и др.]. -СПб.: БХВ-Петербург, 2007. - 1216 с.