Информатика Pascal

Работа № 1

Состоит из трех отдельных заданий, которые охватывают следующие темы: 1) условный оператор; 2) операторы циклов; 3) структурированные типы данных. Результаты выполнения работы № 1 оформляются в виде отчета, который для каждой задачи должен содержать следую щие пункты: 1) текст задачи; 2) подробное описание решения задачи и алгоритм; 3) код программы; 4) результаты работы программы (скриншот). Отчет по контрольной работе вместе с работающими про граммами помещается в архив и отправляется преподавателю на проверку. Пример оформления контрольной работы приведен в приложении.

Задание № 1 Самое главное в этой задаче правильно сформулировать условие для выбора. Это может быть одно сложное логическое выражение для одного условного оператора или несколько усло вий попроще. В последнем случае условных операторов может быть несколько. В описании решения задачи необходимо объяснить, каким образом выбирались эти условия.

Задание № 2 Эту задачу необходимо решить три раза с использованием трех видов цикла: FOR, WHILE и REPEAT. В выводах обязательно сравнить все три цикла и опреде лить, какой именно наилучшим образом подходит для решения этой задачи и почему.

Задание № 3 6 Для решения этого задания используется один или несколь ко структурированных типов данных: строки, массивы, файлы, записи. При решении этих задач рекомендуется использовать под программы (процедуры и функции). Это позволит упростить от ладку программы.

Вариант № 18 1. Двузначное число задано цифрами a2a1, где a1 — число единиц, a2 — число десятков (a2 > 1). Из каких цифр состоит чис ло, равное разности заданного числа и цифры b? Само число определять не нужно.

2. На натуральном отрезке [a,b] найдите и выведите число N с наибольшей суммой своих делителей. Само число и единицу в качестве делителей не учитывать.

3. Для хранения координат точки на плоскости используется тип данных TCoord. Треугольник задан координатами вершин. Определите длины его сторон.

Type

TCoord = record

x, y:real

end;