{* Задачи *}

• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• 11
• 12
• 13
• 14
• 15
• 16
• 17
• 18
• 19
• 20

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of

•  'Задача 208' : Uses zadach208.pas; { Найти самую большую цифру числа(цикл с предусловием ). ... }
•  'Задача 209' : Uses zadach209.pas; { Найти среднее арифметическое общей совокупности элементов тех строк заданной матрицы, последний элемент которых равен 1. ... }
•  'Задача 21' : Uses ochered21.pas; { Возле прилавка в магазине стоит очередь покупателей. Время обслуживания каждого покупателя занесено в одномерный массив. Найти время пребывания каждого покупателя в очере ... }
•  'Задача 210' : Uses zadach210.pas; { Получить массив Х(n) по правилу: Хi =1, если в i-м столбце заданной матрицы есть хотя бы один элемент превышающий заданное значение С, иначе Xi=0. Найти общее число элеме ... }
•  'Задача 211' : Uses zadach211.pas; { Дан массив A(5, 5). Изменить часть матрицы, находящуюся под главной диагональю следующим образом: если элемент A[i, j] этой части матрицы больше элемента A[j, i], то зада ... }
•  'Задача 212' : Uses zadach212.pas; { Определить самую длинную последовательность подряд идущих нулей в заданном одномерном массиве ... }
•  'Задача 214' : Uses zadach214.pas; { Написать программу подсчитывающую в каждой из заданных строк количество слов `мама`. ... }
•  'Задача 215' : Uses zadach215.pas; { Дан массив из 7 строк, в каждой из которых не более 50 элементов. Удалить из каждой строки все пробелы и записать количество удалённых пробелов в конец этой строки. ... }
•  'Задача 216' : Uses zadach216.pas; { В файле из вещественных чисел переставить элементы таким образом, чтобы сначала были записаны все положительные, затем все отрицательные, а потом все нули. ... }
•  'Задача 217' : Uses zadach217.pas; { Записать в конец каждой строки текстового файла количество слов в этой строки. ... }
•  'Задача 218' : Uses zadach218.pas; { Используя вспомогательное нахождения функции sin(x)=x-x**3/3!+x**5/5!-x**7/7!+... процесс суммирования остановить, если очередной член станет меньше 0.001. Вычислить для ... }
•  'Задача 219' : Uses zadach219.pas; { Используя вспомогательное нахождения функции cos(x)=1-x**2/2!+x**4/4!-x**6/6!+... процесс суммирования остановить, если очередной член станет меньше 0.001. Вычислить для ... }
•  'Задача 22' : Uses zadach22.pas; { В кинотеатре 30 рядов кресел. В первом ряду 20 кресел, в каждом следующем на 2 кресла больше, чем в предыдущем. Сколько мест в зрительном зале? ... }
•  'Задача 220' : Uses zadach220.pas; { Дано предложение. Сколько слов являются перевёртышами, и будет ли это число совершенным ... }
•  'Задача 221' : Uses zadach221.pas; { Дано предложение, заканчивающееся '.','!','?'. Разделитель слов - пробел. Определить, будет ли число простым множителем числа S, S - количество букв "т", больше заданного ... }
•  'Задача 222' : Uses zadach222.pas; { Дана таблица a[1..m]. Среди её элементов есть хотя бы один отрицательный. Больше ли сумма простых множителей элементов, идущих после последнего отрицательного элемента, з ... }
•  'Задача 223' : Uses zadach223.pas; { Дана целочисл табл а[1..m]. Среди элементов таблицы есть хотя бы один отрицательный. Найти сумму S элементов, расположенных после отрицательного элемента, затем найти су ... }
•  'Задача 224' : Uses zadach224.pas; { Дано натуральное число. Представьте его в виде суммы степеней двойки. Количество слагаемых - k. Будет ли удвоеная сумма простых множителей числа k больше самого k ... }
•  'Задача 225' : Uses zadach225.pas; { Дано предложение. Сколько слов являются перевёртышами и сколько букв "а" в предложении. Найти их разность ... }
•  'Задача 226' : Uses zadach226.pas; { Дана таблица вещественных чисел а[1..50]. Найти среднее арифметическое положительных элементов таблицы и минимум абсолютного значения элементов таблицы . Найти их произве ... }
•  'Задача 227' : Uses zadach227.pas; { Дана целочисленная таблица а[1..20] положительных элементов. Найти среднее арифметическое элементов таблицы и выяснить, является ли данное натуральное число совершенным ( ... }
•  'Задача 228' : Uses zadach228.pas; { Дано предложение, заканчивающееся точкой. Из слов предложения вычеркивается буква а. Определить, сколько слов в новом предл являются перевертышами ... }
•  'Задача 229' : Uses zadach229.pas; { Дано слово. Найти, сколько раз буква "a" встречается в этом слове. Будет ли это число простым ... }
•  'Задача 23' : Uses zadach20.pas; { Вычислить сумму тех чисел из заданного отрезка [a;b] (a и b - натуральные ), в запись которых входит цифра k. ... }
•  'Задача 230' : Uses zadach230.pas; { Дано предложение. Найти, в каком из слов, состоящем из больше 4-х символов, буква "a" встречается реже ... }
•  'Задача 231' : Uses zadach231.pas; { Дано предложение, заканчивающееся .,!,?. Разделитель слов - пробел. Определить, сколько слов в предложении является перевёртышами и будет ли это число простым ... }
•  'Задача 232' : Uses zadach232.pas; { Дан текст. Установить пробелы вместо символов, номера позиций которых при делении на 4 дают в остатке 3 ... }
•  'Задача 233' : Uses zadach233.pas; { Дан текст. Удалить в нём все слова "функция" ... }
•  'Задача 234' : Uses zadach234.pas; { Заменить данную букву в слове многоточием ... }
•  'Задача 235' : Uses zadach235.pas; { Составить программу проверки есть ли в тексте буква "s" ... }

Else
 writeln('Ничего не выбрано!');
End;

• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• 11
• 12
• 13
• 14
• 15
• 16
• 17
• 18
• 19
• 20

Program pas2123;
Program pas2123..