Про погоду и массивы

Такая школьная простенькая задачка…
Условие:

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

Continue reading

Pascal: Даны произвольные текстовые файлы. Напишите функции, которые возвращают количество строк в файле и среднюю длину строк в тексте

Задачку прислали простенькую, но вдруг пригодится:)

Даны произвольные текстовые файлы. Напишите функции, которые возвращают количество строк в файле и среднюю длину строк в тексте

Continue reading

Pascal: Калькулятор для перевода из одной системы счисления в другую

В прошлом году я писал программу для перевода из любой системы в любую систему счисления на си. Теперь потребовалось на Pascal.Функций стало больше. Некоторые пришлось просто копировать с других сайтов (да простят меня авторы)

К сожалению, точность вычислений здесь меньше, чем была на си — всего один знак после запятой точен.

Continue reading

Pascal: Сумма некоторых элементов массива

Задача: Дан одномерный массив А(n). Получить сумму тех элементов массива, которые не четны и отрицательны.

Идея в том, чтобы заполнить массив, вывести его, а потом в том же цикле проверять, являются ли элементы подходящими. Условие первое — нечетность. Остаток от деления на 2 должен быть не равен нулю. Второе условие — элемент массива меньше нуля. Таким образом выбираются необходимые нам элементы.

Остается лишь сложить эти элементы между собой.

Вот исходный код:
Continue reading

Pascal: Вычисление интеграла методом Симпсона

Для того, что бы понять, как это работает нужно обратиться к геометрическому смыслу интеграла.

Интеграл численно равен площади криволинейной трапеции, ограниченной кривой y(x), прямыми x=a, x=b и отрезком [a; b] оси Ox.

Формула Симпсона:

Continue reading

Pascal: в двумерном массиве поменять местами максимальный и минимальный элементы

Задача в полной мере описана в заголовке.

Суть сводится к следующему:

  1. Заполнить массив
  2. Вывести массив
  3. Найти минимальный элемент
  4. Найти максимальный элемент
  5. Произвести обмен значений по индексам

Continue reading

Модуль (unit) на паскале

Был у меня блог на av-school.ru, который в скором времени, возможно, прекратит свое существование, поэтому я перенесу некоторые полезные посты из того блога в этот.

Задача на паскале была такая:

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

Continue reading

Pascal, Си/C++, C# Определение совершенного числа

Иногда задают задачи по нахождению совершенного числа.

Как гласит Википедия, Совершенное число это :

натуральное число, равное сумме всех своих собственных делителей (т. е. всех положительных делителей, отличных от самого числа).

Continue reading