Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Delphi.doc
Скачиваний:
49
Добавлен:
16.05.2015
Размер:
539.14 Кб
Скачать

Правила оформления лабораторных работ по курсу «Информатика», раздел «Основы программирования на языке Delphi»

Основные разделы отчета.

Лабораторная работа № <номер работы>

<Название лабораторной работы>

Задание: <Вариант задания, выбранный из списка заданий в соответствии с вариантом >

Блок-схема: <Разработанная и составленная в соответствии с выданным заданием блок-схема программы>

Программа: <Текст программы, записанный по блок-схеме предыдущего раздела>

Результат: <Результат, полученный с помощью программы с указанием тестовых значений>

Лабораторная работа №1. Программирование алгоритмов линейной структуры

Пример программы

Этапы решения задачи

1)Составить и отладить программу для вычисления по указанной формуле.

Задание:

На форме размещены следующие объекты со свойствами:

  • Текстовое поле Edit1 для ввода значения a, с пустым значением свойства Text.

  • Текстовое поле Edit2 для ввода значения b, с пустым значением свойства Text.

  • Текстовое поле Edit3 для ввода значения x, с пустым значением свойства Text.

  • Метка Label1 для подписи Edit1 со значением a= свойства Caption.

  • Метка Label2 для подписи Edit2 со значением b= свойства Caption.

  • Метка Label3 для подписи Edit3 со значением c= свойства Caption.

  • Метка Label4 для подписи Edit3 со значением x= свойства Caption.

  • Метка Label5 для подписи результата со значением L= свойства Caption.

  • Метка Label6 для вывода значения L, с пустым значением свойства Caption.

  • Кнопка Button1 для выполнения действия с пустым значением свойства Caption.

procedure TForm1.Button1Click(Sender: TObject);

var a,b,c,x:integer;

L:real;

begin

a:=StrToInt(Edit1.Text);

b:=StrToInt(Edit2.Text);

c:=StrToInt(Edit3.Text);

x:=StrToInt(Edit4.Text);

L:=(A*sqr(X)+B*X+C)/(A*B*C);

Label6.Caption:=FloatToStr(L);

end;

2) Составить и отладить программу для вычисления по указанной формуле.

Задание:

Блок-схема:

Программа:

procedure TForm1.Button1Click(Sender: TObject);

var a,b,c:integer;

y:real;

begin

a:=StrToInt(Edit1.Text);

b:=StrToInt(Edit2.Text);

c:=StrToInt(Edit3.Text);

y:=Exp(1/5*ln(sqr(a)*sqr(a)*a-sqr(b)*sqr(b)*c))+exp(a);

Label5.Caption:=FloatToStr(y);

End.

Список вариантов

1) Составить и отладить программу для вычисления по указанной формуле. Значения переменных, указанных в правой части, ввести с клавиатуры, результат вывести на экран.

1 .

2.

3.

4.

5.

6.

7.

8.

9.

10.

11.

12.

13.

14.

2) Составить и отладить программу для вычисления по указанной формуле. Значения переменных, указанных в правой части, ввести с клавиатуры, результат вывести на экран.

1.

2.

3.

4.

5.

6.

7.

8.

9.

10.

11.

12.

13.

14.

Контрольные вопросы:

  1. Как запустить программу на выполнение?

  2. Как записываются операторы начала и конца программы?

  3. Из каких разделов состоит программа на языке Delphi?

  4. В какой последовательности должны быть записаны разделы программы на языке Delphi?

  5. Как записываются операторы вывода и ввода на экран в Delphi?

  6. Арифметические выражения: знаки арифметических операций, стандартные функции.

  7. Диапазон допустимых значений для вещественных (REAL) и целочисленных (INTEGER) переменных.

  8. Опишите процесс сохранения работы.

  9. Оператор присваивания: общий вид выполнение.

  10. Что подразумевает описание объекта в программе?

  11. Целый тип: название, операции, выполняемые над данными целого типа.

  12. Вещественный тип: название, операции, выполняемые над данными вещественного типа.

  13. Основные элементы блок-схемы.

  14. Переменные: определение, описание.

  15. Запись математических выражений на языке программирования Delphi.

  16. Приоритеты операций.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]