Основные операции языка Паскаль.

Нахождение площади трапеции. Написать программу, которая запрашивает у пользователя длины оснований и высоту трапеции, рассчитывает площадь и выводит результат вычисления на экран. При составлении программы учесть, что все вводимые величины положительные.

Нахождение объема конуса. Написать программу, которая запрашивает у пользователя высоту и радиус основания конуса, рассчитывает объем и выводит результат вычисления на экран. При составлении программы учесть, что высота и радиус основания конуса – положительные величины.

Нахождение площади поверхности правильного тетраэдра. Написать программу, которая запрашивает у пользователя длину ребра правильного тетраэдра, рассчитывает площадь его поверхности и выводит результат вычисления на экран. При составлении программы учесть, что длина ребра тетраэдра – положительная величина.

Вывод таблицы умножения шестнадцатеричных чисел. Программа выводит на экран таблицу умножения шестнадцатеричных чисел в пределах от 1h до Fh (h означает шестнадцатеричное число). Таблица умножения представляет собой обычную квадратную таблицу, в ячейках которой расположены произведения номеров столбцов и строк (т. е. в столбце Bh строки 2h будет расположено число 2h•Bh=16h). Столбцы и строки таблицы нумеруются от 1h до Fh (при этом для экономии места на экране и улучшения читаемости букву h не выводить).

Проверка для заданного числа, является ли оно номером «счастливого» билета. Пользователь вводит натуральное число. Программа определяет, является ли оно номером «счастливого» билета, и выводит соответствующее сообщение. «Счастливым» называется билет, в номере которого сумма трех первых цифр совпадает с суммой трех последних (номер шестизначный).

НЕ нашли? Не то? Что вы ищете?

Определение вероятности получения «счастливого» билета. Программа выводит вероятность, с которой билет может оказаться «счастливым». «Счастливым» называется билет, в номере которого сумма трех первых цифр совпадает с суммой трех последних (номер шестизначный). Вероятность определяется как отношение числа всех «счастливых» билетов к числу всех возможных билетов с шестизначным номером.

Процедуры и функции

Вычисление наименьшего общего кратного. Написать функцию, которая вычисляет НОК двух натуральных чисел. Числа передаются функции в качестве параметров.

Нахождение длин сторон треугольника. Даны координаты трёх вершин треугольника. Написать процедуру, которая находит длины его сторон.

Нахождение простых чисел. Написать функцию, которая вычисляет количество простых чисел на отрезке от 1 до N включительно. N – параметр функции.

Нахождение делителей числа. Дано натуральное число. Написать процедуру, которая находит все его делители и подсчитывает их число.

Одномерные массивы

С одномерным массивом, состоящим из n вещественных элементов, произвести следующие операции:

1) найти количество положительных элементов массива;

2 найти количество элементов массива, меньших определенного числа, вводимого пользователем;

3) вычислить сумму элементов массива, расположенных после последнего элемента, равного нулю;

4) вычислить сумму целых частей элементов массива, расположенных после последнего отрицательного элемента;

5) вычислить произведение отрицательных элементов массива;

6) вычислить сумму положительных элементов массива, расположенных до максимального элемента. При наличии нескольких максимальных элементов (равных друг другу) выбирается последний из них;

7 преобразовать массив таким образом, чтобы сначала располагались все элементы, отличающиеся от максимального не более чем на 20%, а потом — все остальные.

8) изменить порядок следования элементов в массиве на обратный.

Многомерные массивы

Дана вещественная квадратная матрица. Найти номер первой из строк, не содержащих ни одного положительного элемента. Найти номер последней из строк, содержащих нулевой элемент. Определить сумму элементов тех строк, которые не содержат отрицательных элементов.

Составить программу вычисления произведения двух квадратных целочисленных матриц A и B размером n´n соответственно. Элементы результирующей матрицы вычисляются по формуле

,

где n – размерность матриц A и B.

Заполнить массив размерностью 6´6 по правилу

Файловый ввод-вывод

Вычисление длины файла. Вычислить длину текстового файла в символах (без учета символов переноса строки ‘ ’, ‘ ’), результат дописать в конец этого же файла с соответствующим комментарием.

Изменение данных в файле. Записать в текстовый файл ряд целых чисел 0, 1, 2…N, затем M раз случайным образом заменить элементы на -1. Числа N, M вводятся пользователем.

Заполнение файла случайными числами и его последующая обработка. Записать в двоичный файл N случайных действительных чисел. Найти разность первого и последнего элемента файла. N – случайное число, не превышающее 100.

Выборочный вывод значений из файла. Записать в двоичный файл n элементов последовательности . Вывести на экран те компоненты файла, для которых выполняется |, где Eps – заданное число. Числа n и Eps вводятся пользователем.

Строки

Дана последовательность, содержащая до 5 слов, в каждом из которых до 5 строчных латинских букв; между соседними словами — не менее одного пробела, за последним словом — точка. Напечатать все слова последовательности, предварительно преобразовав каждое из них по следующему правилу:

1) перенести первую букву в конец слова;

2) если слово нечетной длины, то удалить его среднюю букву.

Дана последовательность, содержащая до 5 слов, в каждом из которых до 5 строчных латинских букв; между соседними словами — не менее одного пробела, за последним словом — точка. Напечатать все слова последовательности, предварительно преобразовав каждое из них по следующему правилу:

1) перенести последнюю букву в начало слова;

2) удалить из слова первую букву.

Дана последовательность, содержащая до 5 слов, в каждом из которых до 5 строчных латинских букв; между соседними словами — не менее одного пробела, за последним словом — точка. Напечатать все слова последовательности, предварительно преобразовав каждое из них по следующему правилу:

1) преобразовать каждое слово к симметричному;

2) если слово нечетной длины, то удалить его последнюю букву.