Дан файл, содержащий текст на русском языке. Найти слово, встречающееся в каждом предложении, или сообщить, что такого слова нет PASCAL

1) (X1 v X2) & (X1 v X2)
2) (X1vX1)v(X2vX2)v(X3vX3)

больше 10 букв? Программа должна вывести одно слово: «Верно» или «Неверно»(Pascal ABC)

1.

языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.

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

е учебника по русскому языку.Найти и вывести на экран сумму денег Помогите пожалуйста

русском языке или на одном из языков программирования алгоритм, который находит и выводит наименьший номер элемента, равного X, или сообщение, что такого элемента нет.
const N=30;


var a: array [1..N] of integer;


i, j, x: integer;