|
|
| Другие темы раздела | |
|
Turbo Pascal Кодирование
https://www.cyberforum.ru/ turbo-pascal/ thread981175.html Текст шифруется следующим способом: каждое предложение разбивается на группы по три слова. Недостающие слова заменяются «*». Меняется местами первое слово в группе с третьим, второе остается на месте. |
Turbo Pascal Определить количество целых корней уравнения помогите составит программу, я вообще не пойму что делать, вроде что-то связанное со схемой горнера. Вот задача: Дано уравнение ax^3+bx^2+cx+d=0 с целыми коэффициентами (0<|d|<=2). Определить количество целых корней этого уравнения |
|
Turbo Pascal Найти частичную сумму ряда
https://www.cyberforum.ru/ turbo-pascal/ thread981125.html Помогите, вроде как сделал, но мне кажется, что это не то Ряд: 1+1/2+1/4+1/8+... Найти частичную сумму ряда. Ряд сходится к значению 2. s в цикле почему-то 6 раз становится значением 2, потом только выходит. program zadacha; var b,s,a:real; begin b:=1; s:=0; while s<2 do |
Turbo Pascal Задача на количество цифр Найти количество цифр в целом числе,заданном с клавиатуры.Максимальное количество цифр-6. 1)составить и отладить программу 2)проверить на тестовых данных:156;2368;56732;168904 Помогите пожалуйста,буду очень благодарен :) https://www.cyberforum.ru/ turbo-pascal/ thread981116.html |
|
Как настроить турбо паскаль, модуль - graph Turbo Pascal Написал программу в ТП 7.0, ошибок не выдал, модуль подключил, но как только я запускаю программу, окно открывается, ждет 2 сек и закрывается. Дайте мне подробную инструкцию по настройке ТП 7.0 для работы с графами. И вот код для pascal abc net, как его перевести в код для ТП 7.0 ? program lab9; uses GraphABC; var ar: array of point; xP,yP:integer; begin xP:=300; |
Turbo Pascal X/Y было наибольшим возможным
https://www.cyberforum.ru/ turbo-pascal/ thread981085.html Вам дано N чисел. Выберите из них такие два x и y, чтобы их частное x/y было наибольшим возможным. Входные данные: В первой строке входного потока находится одно целое число N - общее количество чисел (2 <= N <= 30 000). В следующей строке входного потока находятся N целых чисел a1, a2, ... , aN; числа не превосходят по модулю 30 000. Гарантируется, что среди этих чисел хотя бы одно не равно... |
| Turbo Pascal Вывести каждую вторую букву алфавита Нужно вывести каждую вторую букву алфавита . https://www.cyberforum.ru/ turbo-pascal/ thread981068.html |
Turbo Pascal Работа с файламы Может кто нибудь помочь мне с программой. У меня тут проблема в том, что когда программа запускаю у меня меню 2 должен работать с данными которые я вёл первый раз (т.е без ввода данных (без меню 1)). Мне тут надо ввести в экран все элементы до 1-го чётного program p1; uses crt; var f:file of integer; n,i,j,k:integer; c:integer; p:byte; a:array of integer; Procedure... |
| Turbo Pascal код Хемминга Определить, сколько информационных и сколько проверочных символов имеется в кодовом слове Хемминга длиной n https://www.cyberforum.ru/ turbo-pascal/ thread981054.html | Turbo Pascal По введенным координатам 3 точек на плоскости вычислить определить соответствующий треугольник По введенным координатам 3 точек на плоскости вычислить определить соответствующий треугольник (если это возможно), вычислив величины его углов, периметр и площадь. Указание: Точки задавать, используя записи с двумя полями (вещественного типа), вывод результатов организовать таблицей следующего вида. Самостоятельно найти способ прорисовки рамок таблицы и округления входящих в нее значений... https://www.cyberforum.ru/ turbo-pascal/ thread981048.html |
|
Составить из символов слово Turbo Pascal Запрашивая у пользователя произвольные символы,пока не будет введен пробел,составить из них слово и подсчитать количество символов в слове. |
Turbo Pascal В произвольной последовательности чисел подсчитать количество положительных и отрицательных элементов в произвольной последовательности чисел подсчитать количество положительных и отрицательных элементов. https://www.cyberforum.ru/ turbo-pascal/ thread980950.html |
|
0 / 0 / 0
Регистрация: 01.03.2012
Сообщений: 101
|
|
| 19.10.2013, 08:28 [ТС] | 0 |
Найти самое длинное слово в предложении и указать его порядковый номер. - Turbo Pascal - Ответ 520361019.10.2013, 08:28. Показов 3296. Ответов 6
Метки (Все метки)
Ответ
А если в предложении встречается несколько таких слов, как указать порядковый номер последнего, длинного слова.
Вернуться к обсуждению: Найти самое длинное слово в предложении и указать его порядковый номер. Turbo Pascal
0
|
|
| 19.10.2013, 08:28 | |
|
Готовые ответы и решения:
6
|
| 19.10.2013, 08:28 | |
| 19.10.2013, 08:28 | |
|
Помогаю со студенческими работами здесь
0
Вывести самое длинное слово в предложении
|