Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
anonimus23
0 / 0 / 0
Регистрация: 20.04.2017
Сообщений: 2
#1

Из двух исходных строк, идущих друг за другом сформировать одну, если их суммарная длина менее 70 символов

27.04.2017, 10:31. Просмотров 760. Ответов 1
Метки нет (Все метки)

Из двух исходных строк, идущих друг за другом сформировать одну, если их суммарная длина менее 70 символов
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.04.2017, 10:31
Ответы с готовыми решениями:

Заменить любое количество одинаковых символов, идущих друг за другом подряд
Разработать программу, которая в текстовой строке заменяет любое количество одинаковых символов,...

Подсчитать количество случаев равенства двух чисел, идущих друг за другом
Привет всем! Помогите, пожалуйста, с задачей) Ввести N чисел. Подсчитать количество случаев...

Ввести N чисел. Подсчитать количество случаев равенства двух чисел, идущих друг за другом
Привет всем! Помогите, пожалуйста, с задачей) Ввести N чисел. Подсчитать количество случаев...

Запись в файл только тех строк, длина которых не менее заданного количества символов
Здравствуйте дорогие форумчане! Вновь прошу вашей помочи. Требуется установить минимальную длину...

Массив: Сформировать два массива и вывести последовательно друг под другом
Ребят такой вопрос можно допустим сформировать два массива и при выводе их они располагались друг...

1
plodder
4 / 4 / 1
Регистрация: 21.02.2013
Сообщений: 14
27.04.2017, 11:12 #2
Лучший ответ Сообщение было отмечено anonimus23 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program sliyaniestr;
  var f,g: textfile; //объявляю входной(f) и выходной(g) файлы 
      str1,str2: string; //объявляю 1-ю и 2-ю строку
begin
  assign(f, 'input.txt'); //объявляю входной файл
  reset(f); //открываю файл для чтения
  readln(f, str1); //считываю из файла 1-ю строку
  readln(f, str2); //считываю из файла 2-ю строку
  close(f); //закрываю файл
  
  if length(str1)+length(str2) < 70 //проверка условия, что суммарная длина 2-х строк менее 70
    then //если суммарная длина 2-х строк менее 70
      begin
        writeln('Суммарная длина 2-х строк менее 70, записываю объединенную строку в файл.');
        assign(g, 'output.txt'); //объявляю выходной файл 
        rewrite(g); //открываю файл для записи
        writeln(g, 'первая строка' + 'вторая строка'); //записываю объединенную строку в файл
        close(g); //закрываю файл
      end
   else //если суммарная длина 2-х >=(более или равна) 70
     writeln('Суммарная длина 2-х строк более или равна 70.');
  
  writeln('Работа программы завершена.'); 
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.04.2017, 11:12

Вывести наибольшее количество следующих друг за другом символов k
В одной строке содержится последовательность букв k и p, длина которой от 1 до 1000 символов....

сколько введено следующих друг за другом пар символов
Задание: с клавиатуры вводятся символы. Признак конца ввода - конец файла (не совсем понимаю,что...

Из двух строк сделать одну, в которой поочередно будут символы двух строк
Из двух строк сделать одну, в котором поочередно будут символы двух строк.


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

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

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