Самостоятельная работа. Тема: Знакомство с IDE Delphi

Тема: Знакомство с IDE Delphi. Консольные приложения. Реализация линейных алгоритмов, ветвления и знакомство с цикличными структурами.

Введение

Работа выполняется последовательно, при необходимости с записью в тетрадь основных моментов указанных практике. По мере выполнения работы формируется отчет о практике.

Отчет по практике включает:

ü Титульный лист (общепринятый стандарт) с заполненной дисциплиной, видом работы и фамилией исполнителя. Пример титульного листа можно взять из предметной папки.

ü Выполнение практической работы

ü Выполнение индивидуального задания

Для каждого выполненного задания в отчет заносится: Задание, снимок работающего приложения, Код написанной вами программы.

В заданиях, где необходимо продемонстрировать результаты работы преподавателю необходимо делать снимок экрана (PrintScreen – верхний ряд клавиатуры справа над стрелками управления) и вставить его в документ. При нажатии на кнопку происходит сохранение в памяти снимка экрана, и он доступен из буфера обмена.

Текст, выделенный жирным – сформулировано задание, которое нужно выполнить.

Текст, обозначенный курсивом - Пояснительная информация. Указывает подсказки и инструкцию для выполнения.

Текст, с подчеркиванием – рекомендуемый для записи в тетрадь.

1. Запустить Delphi

a. Пуск – Программы - Borland Delphi 7 – Delphi 7 (вызвать окно запуска программы Win+R и записать Delphi32)

b. При возникновении информационного окна – закрыть его

2. Закрыть созданный по умолчанию проект

a. Зайти в меню File – Close All (без сохранения)

3. Создать консольное приложение

a. Зайти в меню File – New – Other

b. В диалоге выбрать Console Application и нажать OK

c. Провести обзор созданного кода

d.

Комментарии в Delphi записываются так:

// Комментарий в одну строку

{ комментарий

который можно

записывать в несколько строк }

Комментарий игнорируются языком программирования

4. Написать программу, которая спросит у пользователя его ФИО и сколько ему лет в этом году будет/было и выдаст его автобиографию.

a. Объявить переменные FIO и Data

b. В блоке кода - Спросить у пользователя его ФИО

c. Занести в переменную FIO

d. Спросить сколько ему лет в этом году

e. Занести в переменную Data

f. Вычислить год рождения

g. Выдать Автобиографию пользователя используя фио и дату рождения.

h. Например

i. Показать преподавателю - Включить в отчет (Задание + снимок + код)

5. Даны два числа a и b. Найти их среднее геометрическое, то есть квадратный корень из их произведения a*b

a. Объявить переменные вещественного типа A, B и Res

b. Считать значение A и B

c. Перемножить их

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

e. Вычислить корень

f. Выдать результат

g. Дать в отчете ответ, почему при выводе результатов было использовано Res:5:2

6. Дано трехзначное число. Вывести его в обратном порядке.

a. В программировании есть две специфических операции DIV и MOD.

ДЕЛЕНИЕ НАЦЕЛО – div – позволяет узнать сколько целых частей второго числа поместиться в первом

Например: есть 20 машин и 6 мужчин – по сколько ЦЕЛЫХ машин достанется каждому ((20 div 6) = 3). Дан отрезок из 15 сантиметров на сколько лент по 4 см его можно разрезать ((15 div 4) = 3) Операцию div можно еще представить как деление одного числа на другое и ОТБРОСИТЬ дробную часть. Аналог - Trunc(x/y).

(20 div 6)→20/6=3,333→3.

(15 div 4)→15/4=3,75→3

Основные задачи, где используется операция div:

Перевод величин (дана длина в сантиметрах – сколько в дециметрах…)

Разделение числа на разряды (X div 10 – кол-во десятков; X div 100 – кол-во сотен; X div 1 – само число без дробной части)

Колво одного периода в другом (Дан номер дня в году – определить неделю. Дан год – определить столетие)

ОСТАТОК ОТДЕЛЕНИЕ – mod – определяет, сколько осталось частей после деления.

Например: 20 машин и 6 мужчин – сколько машин осталось после того деления нацело ((20 mod 6) =2). Дан отрезок 15 сантиметров сколько останется после деление его на отрезки по 4 см ((15 mod 4) =3)

Основные задачи, когда используется операция mod

Определение четное или не четное число (X mod 2 = 0 –четное и X mod 2 = 1 – нечетное)

Узнать кол-во единиц (X mod 10 – последняя цифра числа)

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

c. Заводим переменную X- целое число

d. Заводим переменные Sotni, Des, edin – целые числа

e. Запрашиваем число Х

f. Получаем кол-во его единиц – остаток от деления на 10

g. Получаем число без единиц – деление нацело на 10

h. Получаем кол-во его десятков – остаток от деления на 10

i. Получаем число без десятков – деление нацело на 10 – оно и будет числом сотен

7. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Только два из чисел A, B, C являются четными».

a. Объявить 3 числа и 3 логических переменных

b. Считать три числа

c. Присвоить логическим переменным результаты проверки на четность чисел. (для проверки числа на четность нужно использовать mod 2=0)

d. Вывести результаты проверки.

Самостоятельная работа

Вариант	Задание
Вариант 1	· Дана сторона квадрата a. Найти его периметр P = 4a. · Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = abc и площадь поверхности S = 2(ab + bc + ac). · Найти корни квадратного уравнения Ax^2 + Bx + C = 0, заданного своими коэффициентами A, B, C (коэффициент A не равен 0), если известно, что дискриминант уравнения положителен. · Дано трехзначное число. Найти сумму и произведение его цифр. · Даны три целых числа: A, B, C. Проверить истинность высказывания: «Каждое из чисел A, B, C положительное».
Вариант 2	· Дана сторона квадрата a. Найти его площадь S = a2. · Даны два ненулевых числа. Найти сумму, разность, произведение и частное их квадратов. · Решить линейное уравнение Ax + B = 0, заданное своими коэффициентами A и B (коэффициент A не равен 0). · Дано трехзначное число. Вывести число, полученное при перестановке цифр исходного числа. · Даны три целых числа: A, B, C. Проверить истинность высказывания: «Хотя бы одно из чисел A, B, C положительное».
Вариант 3	· Даны стороны прямоугольника a и b. Найти его площадь S = ab · Даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей. · Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся друг за другом. · Дано трехзначное число. Используя одну операцию деления нацело, вывести первую цифру данного числа (сотни). · Даны три целых числа: A, B, C. Проверить истинность высказывания: «Ровно одно из чисел A, B, C положительное».
Вариант 4	· Даны стороны прямоугольника a и b. Найти его периметр P = 2(a + b) · Даны катеты прямоугольного треугольника a и b. Найти его гипотенузу c и периметр P c =√a2 + b2, P = |a| +|b| + |c| · Известно, что X кг конфет стоит A рублей. Определить, сколько стоит 1 кг и Y кг этих же конфет. · Дано трехзначное число. Вывести вначале его последнюю цифру (единицы), а затем — его среднюю цифру (десятки). · Даны три целых числа: A, B, C. Проверить истинность высказывания: «Ровно два из чисел A, B, C являются положительными». ·
Вариант 5	· Дан диаметр окружности d. Найти ее длину L = πd. В качестве значения π использовать 3.14. · Даны два круга с общим центром и радиусами R1 и R2 (R1 > R2). Найти площади этих кругов S1 и S2, а также площадь S3 кольца, внешний радиус которого равен R1, а внутренний радиус равен R2: Si = πR1^2, S2 = πR2^2, S3 = S1 - S2 · Известно, что X кг шоколадных конфет стоит A рублей, а Y кг ирисок стоит B рублей. Определить, сколько стоит 1 кг шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок. · Дано трехзначное число. Найти сумму и произведение его цифр. · Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равносторонним».
Вариант 6	· Дана длина ребра куба a. Найти объем куба V = a^3 · Даны три точки A, B, C на числовой оси. Найти длины отрезков AC и BC и их сумму. Расстояние между точками · Известно, что купили X кг шоколадных конфет стоит A рублей, а были Y кг ирисок за B рублей. Сколько можно было купить ирисок за В рублей на туже сумму. · Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево. · Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равнобедренным».
Вариант 7	· Дана длина ребра куба a. Найти площадь его поверхности S = 6a^2. · Даны три точки A, B, C на числовой оси. Точка C расположена между точками A и B. Найти произведение длин отрезков AC и BC. Расстояние между точками · Известно, что купили X кг шоколадных конфет стоит A рублей, а можно было купить Y кг ирисок. Сколько стоили ириски. · Дано трехзначное число. В нем зачеркнули первую слева цифру и приписали ее справа. Вывести полученное число. · Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a, b, c является прямоугольным».
Вариант 8	· Дан радиус круга. Найти длину окружности L = 2πR · Даны координаты двух противоположных вершин прямоугольника:(x1, у1), (x2, y2). Найти периметр и площадь данного прямоугольника. · Скорость лодки в стоячей воде V км/ч, скорость течения реки U км/ч (U < V). Время движения лодки по озеру T1 ч, а по реке (против течения) — T2 ч. Определить путь S, пройденный лодкой (путь = время * скорость). Учесть, что при движении против течения скорость лодки уменьшается на величину скорости течения. · Дано трехзначное число. В нем зачеркнули первую справа цифру и приписали ее слева. Вывести полученное число. · Даны целые числа a, b, c. Проверить истинность высказывания: «Существует треугольник со сторонами a, b, c».
Вариант 9	· Дан радиус круга. Найти площадь круга S=πR^2 · Найти значение функции y = 3x^6 — 6x^2 — 7 при данном значении x. · Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили удаляются друг от друга. · Дано трехзначное число. Вывести число, полученное при перестановке цифр сотен и десятков исходного числа (например, 123 перейдет в 213). · Проверить истинность высказывания: «Среди трех данных целых чисел есть хотя бы одна пара совпадающих».
Вариант 10	· Дана длина окружности L. Найти ее радиус R = L/2π · Найти значение функции y = 4(x—3)^3 — 7(x—3)^2 + 2 при данном значении x. · Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу. · Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц исходного числа (например, 123 перейдет в 132). · Проверить истинность высказывания: «Среди трех данных целых чисел есть хотя бы одна пара взаимно противоположных».

Дата добавления: 2015-10-26