СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Проект "Калькулятор"

Категория: Информатика

Нажмите, чтобы узнать подробности

Пошаговое выполнение проекта "Калькулятор" на Лазарусе

Просмотр содержимого документа
«Проект "Калькулятор"»

Проект «Калькулятор»

Задание. Создать приложение для вычисления суммы двух чисел. Окно программы должно выглядеть так, как показано на рисунке.














Ход выполнения 

  1. Создайте приложение. Сохраните проект в папке Калькулятор.

  2. Создайте интерфейс по образцу.














  1. Настройте свойства объектов в соответствии с таблицей.





Компонент

Свойство

Значение

Form1

Caption

Калькулятор

Label1

Caption

Первое число

Label2

Caption

Второе число

Label3

Caption

Результат

Edit1

Text


Пусто


Edit2

Text


Пусто


Edit3

Text


Пусто


Button1

Coption

Вычислить


Понятно, что созданная процедура не содержит ни одной команды. Ваша задача – заполнить шаблон операторами. Все команды, указанные в процедуре между begin и end, будут выполнены при щелчке на кнопке Выполнить.

В нашем случае процедура TForm1 . But ton1Cl ick будет иметь вид:

procedure TForm1.Button1Click(Sender: TObject);

var num1, num2, result: integer;

begin

num1:=StrToInt(edit1.text);

num2:=StrToInt(edit2.text);

result:=num1+num2;

Edit3.text:=IntToStr(result);

end;

.