|
|
|
| Другие темы раздела | |
| Turbo Pascal Дана информация о десяти документах: Дана информация о десяти документах: вид документа (приказ, распоряжение, извещение, постановление, заявление, инструкция ), регистрационный номер, адресат, автор документа, содержание (коротко). Составить программу на языке Pascal поиска (напечатать содержание) и подсчета количества документов, найти все документы для одного адресата. https://www.cyberforum.ru/ turbo-pascal/ thread228522.html |
Составить программу на языке Pascal Turbo Pascal Дана информация о десяти документах: вид документа (приказ, распоряжение, извещение, постановление, заявление, инструкция ), регистрационный номер, адресат, автор документа, содержание (коротко). Составить программу на языке Pascal поиска (напечатать содержание) и подсчета количества документов, найти все документы для одного адресата. |
| Turbo Pascal Отсортировать первую половину массива по возрастанию, а вторую по убыванию(методом выбора) Заполнить массив из 10 элементов случайными числами в интервалеи отсортировать первую половину по возрастанию,а вторую по убыванию(методом выбора). пример: исход.массив 14 25 13 30 76 58 32 11 41 97 результат: 13 14 25 30 76 97 58 41 32 11 https://www.cyberforum.ru/ turbo-pascal/ thread228506.html |
Turbo Pascal Вычислить сумму четных элементов массива
https://www.cyberforum.ru/ turbo-pascal/ thread228499.html Дан массив, содержащий 10 чисел. Вычислить сумму четных элементов. Ввести с клавиатуры х. Определить количество элементов , который больше х |
|
Задана последовательность a1, a2, ...., an. Все отрицательные элементы заменить их модулем. Turbo Pascal Задана последовательность a1, a2, ...., an. Все отрицательные элементы заменить их модулем. |
Turbo Pascal Натуральное число N является точным квадратом
https://www.cyberforum.ru/ turbo-pascal/ thread228487.html Натуральное число N является точным квадратом. |
| Turbo Pascal Минимальная сумма подряд идущих чисел? Кто знает как найти минимальную сумму подряд идущих чисел? Задача сформулирована неверно. Надо уточнить формулировку. Видимо имеется в виду, что последовательность чисел создаётся несколько раз. И в наборе этих последовательностей надо подсчитать минимальную сумму. Добавлено через 19 часов 48 минут Первая строка входного файла содержит n – количество чисел (1 <= n <= 1000). Во второй строке... https://www.cyberforum.ru/ turbo-pascal/ thread228486.html |
Turbo Pascal Вычислить значение выражения program mnogo_vyshisleniy; var x, y, a, b, U : real; begin writeln ('vvedite x, y'); readln (x, y); if abs(x - 1)>= 2 then a:= sqrt(abs(x-1)-2)+sin(x*x-8); b:= (exp(ln(2.7)*abs(x-y)+abs(x-y)*2*x)/(1+ (x*x)/2 -(y*y)/2) else writeln (' ne imeet smysla'); if a>b then |
|
Turbo Pascal Сколько различных букв встречается в слове
https://www.cyberforum.ru/ turbo-pascal/ thread228467.html №1 вывести Сколько различных букв встречается в слове. Например: «МОЛОКО» результат : 4 |
Turbo Pascal Определить сумму квадратов элементов четвертого столбца массива
https://www.cyberforum.ru/ turbo-pascal/ thread228465.html Дан двумерный массив.Определить: а)сумму квадратов элементов четвертого столбца массива; б)сумму квадратов элементов k-й строчки массива. Напишите ,пожалуйста, программу , если можно полностью. |
|
Turbo Pascal Перестановка элементов в одномерном массиве Помогите плиз решить 2 задачи : 1.)Поменять местами 1-ую половину массива со 2-ой половиной,не используя дополнительный массив... 2.)Поменять местами попарно элементы по следующему правилу: 1-ый с 3-им, 2 с 4 ,5 с 7, 6 с 8 и т.д.Размерность массива кратна 4.Заполнить массив случайными целыми числами из диапазона .. Заранее спасибо:) |
Turbo Pascal Составить программу для вычисления значений функции Пожалуйста отпишитесь кто какие задачи соображает, можно не программу полностью а чуток разьяснить сам до конца смогу довести, любые коды) советы) уточнения) разъяснения) буду очень признателен 6. Составить программу для вычисления значений функции f(x)=2*tg(x/2)+1 на отрезке с шагом h. Результаты представить в виде таблицы (1-ый столбе - значения аргумента, 2-ой - значения функции). ... https://www.cyberforum.ru/ turbo-pascal/ thread228456.html |
|
0 / 0 / 0
Регистрация: 13.01.2011
Сообщений: 5
|
|
| 13.01.2011, 22:31 [ТС] | 0 |
Найти максимальную и минимальную строку и поменять их местами - Turbo Pascal - Ответ 128554613.01.2011, 22:31. Показов 868. Ответов 5
Метки (Все метки)
Ответ
В тексте из 5-6 строк найти максимальную и минимальную строку и поменять их местами. Найти все слова с большой буквы.
Вернуться к обсуждению: Найти максимальную и минимальную строку и поменять их местами Turbo Pascal
0
|
|
| 13.01.2011, 22:31 | |
|
Готовые ответы и решения:
5
Найти среди простых цифр - максимальную и минимальную цифры и поменять их местами Поменять в массиве максимальную и минимальную строки местами Поменять местами слова, имеющие максимальную и минимальную длины |
| 13.01.2011, 22:31 | |
| 13.01.2011, 22:31 | |
|
Помогаю со студенческими работами здесь
0
Поменять местами максимальную и минимальную цифру заданного числа
|