Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
qivieri
0 / 0 / 0
Регистрация: 31.03.2014
Сообщений: 1
#1

Найти и вывести слово наибольшей длины, а также его номер - Pascal ABC

03.04.2014, 18:30. Просмотров 505. Ответов 1
Метки нет (Все метки)

Пользователь вводит с клавиатуры несколько слов (кол-во определите сами). Найти и вывести слово наибольшей длины, а также его номер
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.04.2014, 18:30
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Найти и вывести слово наибольшей длины, а также его номер (Pascal ABC):

Дана матрица размера M × N. Найти номер ее строки с наибольшей суммой элементов и вывести данный номер, а также значение наибольшей суммы. - Pascal ABC
Дана матрица размера M × N. Найти номер ее строки с наибольшей суммой элементов и вывести данный номер, а также значение наибольшей суммы.

Вывести первое слово текста наибольшей длины - Pascal ABC
1) Дан текстовый файл. Вывести первое слово текста наибольшей длины. Словом считать набор символов, не содержащий пробелов и ограниченный...

Найти слово максимальной длины и вывести его на печать - Pascal ABC
Всем добрый день\утро\вечер с подобной просьбой обращаюсь впервые (да что там на форме программистов с подобной просьбой впервые) НО мне...

Вывести первое и последнее слово текста наибольшей длины - Pascal ABC
Дан текстовый файл. Вывести первое и последнее слово текста наибольшей длины (с учетом знаков препинания, расположенных в начале и в конце...

Вывести первое и последнее слово текста наибольшей длины. - Pascal ABC
Данo текстовый файл, вывести первое и последнее слово текста наибольшей длины. Дано число k(<10) и текстовый файл содержащий...

Вывести минимальный из тех элементов набора, которые больше В, а также его номер - Pascal ABC
Дано число В(>0) и набор из десяти чисел.Вывести минимальный из тех элементов набора,которые больше В,а также его номер.Если чисел,больших...

1
wendigo9
8 / 8 / 4
Регистрация: 19.03.2014
Сообщений: 26
03.04.2014, 18:44 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
program qivieri;
 
var
  s, smax: string;
  i, n, max, ind: integer;
 
begin
  writeln('Введите кол-во слов');
  readln(n);
  max := 0;
  writeln('Введите слова');
  for i := 1 to n do
  begin
    readln(s);
    if length(s) > max then
    begin
      max := length(s);
      smax := s;
      ind := i;
    end;
  end;
  writeln('Самое длинное слово "', smax, '" , под номером ', ind);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.04.2014, 18:44
Привет! Вот еще темы с ответами:

Вывести на экран слово наибольшей длины - Pascal
1)вводится простое повествовательное предложение (слова разделены одним пробелом).вывести на экран слово наибольшей длинны. ваша...

Даны два слова (длины M и N), состоящие из букв А, Г, Ц, Т. Найти подпоследовательность наибольшей длины - Pascal
Молекулы ДНК, содержащие генетическую информацию – это длинные слова из четырех букв (А, Г, Ц, Т). В процессе эволюции, в результате...

Текстовый файл: В каждой строке определить слово наибольшей длины - Pascal ABC
задача 3. Дан текстовый файл f. В каждой строке определить слово наибольшей длины. Результаты выполненых действий сохранить в текстовом...

Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента, равного 2 - Pascal
Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru