Руководство к выполнению практической работы в объектно-ориентированной среде Lazarus «Создание программы для перевода из десятичной системы счисления в двоичную»

Руководство к выполнению практической работы

«Создание программы для перевода из десятичной системы счисления в двоичную»

1.       Запустите приложение создания программы в объектно-ориентированной среде Lazarus и измените цвет Формы (Form1) с помощью свойства Color.

2.       Разместите на форме элемент Метка (Label1).

3.       Задайте значения свойств Метки Color и Caption

4.       Разместите на форме ещё одну Метку (Label2).

5.       Задайте свойство Caption объекта Метка Label2

6.       Разместить на форме однострочное окно Поле  (Edit).

7.       Для вывода результатов разместить на форме ещё одно однострочное окно (Edit2).

8.       Для запуска вычислений разместить на форме Командную кнопку Button (Ok).

9.       Для ввода программного кода дважды щёлкнуть на командной кнопке и в окне программного кода ввести программу

Procedure TForm1.Button1Click (Sender:TObject);

Var x, xi, i : integer;  st, rez: string;

Begin

X := strtoint (edit1.text);

St:= ‘’;

While x > 0 do

Begin

Xi:= X mod 2;

St:= st + inttostr (xi);

X := X div 2;

 End;

For i := length (St) downto 1 do rez := rez + St [i];

edit2.text:= rez;

end;

10.   Запустить программу на исполнение (выбрав один из предложенных вариантов)

1)      Выбрать команду Запуск → Запуск (Run → Run)

2)      Нажать клавишу F9

3)      Нажать кнопку u на панели инструментов

11.   Сохранить проект под именем Projeckt1_ Ф.И._класс.

Разработка учителя информатики

ГБОУ СШ № 4 им. В.П. Глушко города Байконур

Казаковой Альбины Викторовны