Рекомендуемый план разработки проекта

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

Практична робота № 10

ПРАКТИЧНЕ ЗАНЯТТЯ №55

Тема: Розробка проекта у Delphi з використанням функцій StrToInt(); FloatToStr() та Format() і процедури

Мета: Створити програму, у якій визначається оптимальна вага людини

Теоретичні відомості

Проект “Худой или полный?”.

Типы переменных. Целочисленный и Действительный типы переменных: integer и real.

Преобразование типов переменных из строкового в целочисленный или в дествительный. Функции StrToInt(); FloatToStr(); Format();

Алгоритм выбора. Оператор условия if – then – else.

Известно, что оптимальный вес человека определяется так: рост человека минус 100. Если твой фактический вес меньше оптимального, то ты худой, и наоборот, если больше, то надо похудеть.

Надо разработать такую программу, чтобы пользователь, введя свой рост и фактический вес, мог бы с помощью программы определить, худой он или полный, и насколько надо поправиться или похудеть (см. рис 1).

Рисунок 1.

1. В соответствии с рис.2 расположите необходимые компоненты. В Edit1 будем вводить вес в кг., а в Edit2 – рост в см.

Рисунок 2

2. Сохраните оба файла проекта в папке Weight.

3. Введите в раздел VAR переменные для сохранения значений фактического веса (faktW), оптимального веса (optW), роста (Rost) и разницы между оптимальным весом и фактическим (Delta). Пусть значения этих переменных будут округленными, в этом случае тип этих переменных можно объявить как Integer.

VAR

factW, optW, Rost, Delta: integer;

4. Образуйте процедуру, реагирующую на щелчок по кнопке Button1, и заполните ее следующим кодом.

procedure TForm1.Button1Click(Sender: TObject);

Дата добавления: 2014-12-25