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

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
юрчик
0 / 0 / 0
Регистрация: 30.04.2014
Сообщений: 8
#1

Даны целые положительные числа N1 и N2 и строки S1 и S2. Получить из этих строк новую строку - Pascal ABC

31.05.2014, 13:21. Просмотров 1134. Ответов 4
Метки нет (Все метки)

Даны целые положительные числа N1 и N2 и строки S1 и S2. Получить из этих строк новую строку, содержащую первыеN1 символов строки S1 и последние N2 символов строки S2 (в указанном порядке).

решить строчными операторами, заранее спасибо!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.05.2014, 13:21
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Даны целые положительные числа N1 и N2 и строки S1 и S2. Получить из этих строк новую строку (Pascal ABC):

Получить из этих строк новую строку, объединив N1 первых символов строки S1 и N2 последних символов строки S2. - Pascal
1. Даны два числа: N1 и N2, и две строки: S1 и S2. Получить из этих строк новую строку, объединив N1 первых символов строки S1 и N2...

Даны целые положительные числа A и B (A < B). Вывести все целые числа от A до B включительно; при этом каждое - Pascal ABC
Даны целые положительные числа A и B (A &lt; B). Вывести все целые числа от A до B включительно; при этом каждое число должно выводиться ...

Даны целые положительные числа A и B (A < B). Вывести все целые числа от A до B включительно - Pascal
Даны целые положительные числа A и B (A &lt; B). Вывести все целые числа от A до B включительно; при этом каждое число должно выводиться...

даны целые положительные числа M,N - Pascal
даны целые положительные числа M,N и набор из N чисел.Сформировать матрицу размера N*M,у которой в каждом строке содержатся все числа из...

while Даны целые положительные числа... - Pascal
Даны целые положительные числа N и K. Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а также...

Даны целые положительные числа N и K - Pascal
Даны целые положительные числа N и K. Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а также...

4
Puporev
Модератор
52840 / 40651 / 13898
Регистрация: 18.05.2008
Сообщений: 94,349
31.05.2014, 13:25 #2
Pascal
1
s:=copy(s1,1,n1)+copy(s2,n2,length(s2)-n2+1);
0
erl27
890 / 739 / 432
Регистрация: 06.09.2013
Сообщений: 1,561
31.05.2014, 14:01 #3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  n1, n2: integer;
  s1, s2, s: string;
 
begin
  write('n1 = ');
  readln(n1);
  write('n2 = ');
  readln(n2);
  writeln(' Введите строку S1:');
  readln(S1);
  writeln(' Введите строку S2:');
  readln(S2);
  s := copy(s1, 1, n1) + copy(s2, length(s2) - n2 + 1, n2);
  writeln(S)
end.
Добавлено через 2 минуты
Цитата Сообщение от Puporev Посмотреть сообщение
copy(s2,n2,length(s2)-n2+1)
Puporev, ты немного перепутал: сначала индекс, а потом количество
0
юрчик
0 / 0 / 0
Регистрация: 30.04.2014
Сообщений: 8
31.05.2014, 15:31  [ТС] #4
Ошибка времени выполнения: Входная строка имела неверный формат. выводит это
0
Puporev
Модератор
52840 / 40651 / 13898
Регистрация: 18.05.2008
Сообщений: 94,349
31.05.2014, 16:07 #5
Чтобы пользователь правильно вводил
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var
  n1, n2: integer;
  s1, s2, s: string;
 
begin
  writeln(' Введите строку S1:');
  readln(S1);
  writeln(' Введите строку S2:');
  readln(S2);
  repeat
  write('Введите n1 от 1 до ',length(s1),' n1=');
  readln(n1);
  until n1 in [1..length(s1)];
  repeat
  write('Введите n2 от 1 до ',length(s2),' n2=');
  readln(n2);
  until n2 in [1..length(s2)];
  s := copy(s1, 1, n1) + copy(s2, length(s2) - n2 + 1, n2);
  writeln(S)
end.
Добавлено через 42 секунды
Цитата Сообщение от юрчик Посмотреть сообщение
Входная строка имела неверный формат
Это что же нужно ввести?
0
31.05.2014, 16:07
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.05.2014, 16:07
Привет! Вот еще темы с ответами:

Даны целые положительные числа N и K - Pascal
while 3.Даны целые положительные числа N и K. Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а...

Даны целые положительные числа N и K. Вычислить сумму ряда - Pascal ABC
Даны целые положительные числа N и K. Найти сумму 1(в степени K)+2(в степени K)+...N(в степени K). Чтобы избежать целочисленного...

даны целые положительные числа M и M. сформировать целочисленную матрицу размера MxN - Pascal
даны целые положительные числа M и M. сформировать целочисленную матрицу размера MxN, у которой все элементв jго столбца имеют ...

Даны три строки. Определить, можно ли из символов первых двух строк получить третью строку. - Pascal ABC
Даны три строки. Определить, можно ли из символов первых двух строк получить третью строку.


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

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

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