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

Правильный ответ:

• # Разработать консольное приложение и программу в среде программирования Lazarus. Создать интерфейс, соответствующий условию.Тело имеет форму параллелепипеда с высотой . Прямоугольник в основании имеет диагональ . Известно, что диагонали основания пересекаются под углом α. Найти объём тела и площадь поверхности .
• # Напишите программу, используя процедуры и функции. Вводится последовательность из целых положительных элементов. Для простых элементов последовательности определить сумму цифр. Написать процедуру, которая проверяет, является ли число простым, и вычисляет сумму цифр в нём. Если число простым не является, то процедура выдает соответствующее сообщение.
• # Решить задачу. Вычислить среднее арифметическое элементов массива , расположенных между его минимальным и максимальным значениями. Если минимальный элемент размещается в массиве раньше максимального, то упорядочить массив на данном промежутке по возрастанию его элементов.
• # Создать структуру с данными по таблице 8.5. Добавить и вычислить в структуре поле "Возраст", текущую дату вводить с формы. Определить количество молодых специалистов (моложе 25 лет). Упорядочить записи по возрастанию оклада. Таблица должна содержать не менее десяти записей. Сведения о сотрудникеФИОДата рожденияДолжностьСтажОкладСергеев С. И.12.03.1966Менеджер21250...
• # Создать структуру с данными по таблице 8.11. Добавить и вычислить в структуре поле "Гарантийное обслуживание" по следующему принципу: записать фразу "1 год", если гарантийный срок более 3 лет, в противном случае — фразу "нет обслуживания". Найти общее количество всех приборов. Упорядочить записи по названию прибора. Таблица должна содержать не менее десяти записей. Сведения о приборахНазвание прибораШифр прибораДата выпускаКоличествоГарантийный срок, мес.МикроскопМ12-0812.06.200620024...