Простейший калькулятор

Программирование в Lazarus для школьников.

Занятие № 11.

Простейший калькулятор.

Матыцин Игорь Владимирович

Учитель математики и информатики

МБОУ СОШ с. Девица

Цель: написать программу калькулятора, который выполняет четыре арифметические операции.

Девица 2012.

Сегодня, наконец, закончим основу для простейшего калькулятора.

Рис. 11.1 Интерфейс программы калькулятор.

Для каждой кнопки с цифрой уже прописано:

form1.Edit1.Text:=form1.Edit1.Text+номеркнопки;

Теперь необходимо сделать так, чтобы после ввода первого числа при нажатии на операции происходила запись числа в переменную и очистка поля ввода.

Для записи будем использовать обычную переменную вещественного типа.

А очистить поле можно так:

form1.Edit1.Text:='';

Но встает вопрос как же отличать операции? Давайте создадим целочисленную переменную в которую будем записывать цифру соответствующую операции.

Сложение

Вычитание

Умножение

Деление

И при нажатии на кнопку операции будем вносить эти значения в переменную.

А затем при нажатии на равно будем брать второе число и при помощи оператораCase будем выбирать какую же операцию сделать.

Для вычитания обработчик будет выглядеть так:

x1:=strtofloat(edit1.Text);

form1.Edit1.Text:='';

op:=2;

Здесьx1-это переменная, в которую запишем первое число, op-код операции.

Вотобработчиккнопкиравно:

procedure TForm1.Button17Click(Sender: TObject);

begin

x2:=strtofloat(edit1.Text);

form1.Edit1.Text:='';

case op of

1:edit1.Text:=floattostr(x1+x2);

2:edit1.Text:=floattostr(x1-x2);

3:edit1.Text:=floattostr(x1*x2);

4:edit1.Text:=floattostr(x1/x2);

end;

end;

Тутx2-второе число.

Как видно для результата не создается специальная переменная, а сразу вставляется выражение соответствующее коду.

После того, как все обработчики событий будут прописаны остается только создать кнопку для очистки поля ввода. Вотееобработчик:

procedure TForm1.Button2Click(Sender: TObject);

begin

form1.Edit1.Text:=form1.Edit1.Text+'2';

end;

Рис. 11.2 Итоговый вид программы калькулятор.

Практическое задание.

Вставить в калькулятор функцию извлечения корня.

Вставить функцию возведения в квадрат.

Вставить функции тригонометрии.

Адрес публикации: https://www.prodlenka.org/metodicheskie-razrabotki/70144-prostejshij-kalkuljator