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

Pascal (Паскаль)

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

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

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

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

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

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

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

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

Суммарная длина слов - C#
Добрый день.В универе дали задачу:пользыватель вводит рядок с клавиатуры,подщитать сумарную длинну слов.Написать на с#.Буду очень...

Размещение двух div друг над другом - HTML, CSS
Есть 2 div`а: <div class="d1"></div> <div class="d2">asd</div> Их стили: .d1 { position:...

1
plodder
4 / 4 / 1
Регистрация: 21.02.2013
Сообщений: 14
27.04.2017, 11:12 #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
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 - Free Pascal
В одной строке содержится последовательность букв k и p, длина которой от 1 до 1000 символов. Требуется вывести одно число - наибольшее...

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

Массив: Сформировать два массива и вывести последовательно друг под другом - C++
Ребят такой вопрос можно допустим сформировать два массива и при выводе их они располагались друг под другом т.е. вот так 1 2 3 4 5 1 2...

Сформировать вектор из двух исходных - C (СИ)
Помогите пожалуйста разобраться в данной задаче: Даны три вектора A, B и C размерности 10. Элементами вектора А являются имена, вектора B...


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

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

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