Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Вывести сумму, разность, произведение и частное данных чисел https://www.cyberforum.ru/ pascalabc/ thread1116181.html
Ввод двух чисел. Программа должна вывести сумму, разность, произведение и частное этих чисел.
Вывод на печать второй массив, где меняются местами чётные и нечётные Pascal ABC
Задача С клавиатуры задаётся количество элементов массива m (пользователь задаёт сам). NG - нижняя, VG - верхняя граница случайного диапазона чисел. Массив распечатать, определить минимум и максимум. Если пользователь вводит m- чётное, то вывести на печать второй массив, где меняются местами чётные и нечётные. Помогите пожалуйста решить.
Pascal ABC Расположть числа в массиве так, чтобы первыми шли отрицательные числа, затем положительные https://www.cyberforum.ru/ pascalabc/ thread1116037.html
Массив А содержит 100 чисел,из которых 50 чисел положительных, а 50- отрицательных. Расположите их в том же массиве так,чтобы первым шли отрицательные числа,затем -положительные ,причем порядок появления чисел после перестановки может быть произвольным
Pascal ABC Построить численную интерполяцию функции https://www.cyberforum.ru/ pascalabc/ thread1115931.html
Построить численную интерполяцию функции y=f(x)=(2+x(1+cos(x))) на отрезке в точках X принадлежащих этому отрезку не совпадающих с узлами интерполяции, используя интерполяционный полином Лагранжа. В качестве Х выбрать середины отрезков между интерполяционными узлами. Помогите!! Жесть какая тварится на парах(((
Замена скобок и вывод части строки Pascal ABC
Составьте алгоритм и программу обработки введенной с клавиатуры строки в соответствии с вариантом задания с использованием стандартных функций и процедур для работы со строками. Строка содержит арифметическое выражение с круглыми скобками. Заменить каждую скобку двумя такими же скобками. Вывести часть строки, заключенную между первой открывающей и первой закрывающей скобками.
Pascal ABC В строке удалить все слова на нечетных порядковых позициях, а слова на четных позициях напечатать перевернутыми в строке удалить все слова на нечетных порядковых позициях, а слова на четных позициях напечатать перевернутыми Предложения может быть любое :cry: зделал на С++ а вот в паскале не могу реализовать using System; using System.Collections.Generic; using System.Text; using System.Text.RegularExpressions; namespace ConsoleApplication1 { https://www.cyberforum.ru/ pascalabc/ thread1115880.html
Pascal ABC Обработка строковых данных в языке программирования Pascal Ваша программа должна в заданном тексте удвоить каждый символ, стоящий на нечетном месте. https://www.cyberforum.ru/ pascalabc/ thread1115860.html Модуль разности гипотенуз Pascal ABC
Сравнить гипотенузы двух прямоугольных треугольников, если заданы их катеты. Вычислить модуль разности гипотенуз.
Pascal ABC Анимация. Нужно, чтобы много кругов рандомно отскакивали от всех стен https://www.cyberforum.ru/ pascalabc/ thread1115683.html
1.мне нужно чтоб много кругов рандомно отскакивали от всех стен! По правилам форума - один вопрос - одна тема. Ваши остальные задания здесь: 2) https://www.cyberforum.ru/pascalabc/thread1116600.html 3) https://www.cyberforum.ru/pascalabc/thread1116602.html
Pascal ABC Возвести число в куб https://www.cyberforum.ru/ pascalabc/ thread1115661.html
как написать на я зыке паскаль куб числа? и какие вобще есть команды?
Вычислить площадь треугольника по формуле Герона Pascal ABC
Ребят доброго времени суток. кто может помочь сделать работу в паскале,работа легкая и быстро сделать можно,но я мало соображаю... Вообщем 4 вариант...Вот пытался сделать пример: Program L1Z1; uses crt; Var x,y,z,z1,z2,z3,e:Real; Begin writeln('текст 1'); writeln('текст, гр. Т-13-2'); writeln;
Pascal ABC Переделать задачу на сортировку имеется пример задачи на чтение файла и сортировку, нужно его переделать под другое условие, сам туплю и не получается это сделать... сдавать нужно завтра утром. вот сама задача var j : byte; begin reset ( sp); {открытие файла для чтения} writeln (‘ Список студентов: ‘); while not eof (sp) do with spisok do begin Read (sp, spisok); {чтение... https://www.cyberforum.ru/ pascalabc/ thread1115586.html
Модератор
9746 / 5081 / 3287
Регистрация: 17.08.2012
Сообщений: 15,638
11.03.2014, 15:09 0

Обработка строковых данных в языке программирования Pascal - Pascal ABC - Ответ 5884954

11.03.2014, 15:09. Показов 1385. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Pepsikan1 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var s, p: string;
begin
  writeln('Введите строку:');
  readln(s);
  writeln('Введите подстроку:');
  readln(p);
  if pos(p, s) = 0
    then writeln('Подстрока не найдена.')
    else begin
      delete(s, pos(p, s), length(p));
      if pos(p, s) = 0
        then writeln('Нет второго вхождения подстроки в строку.')
        else writeln('Второе вхождения подстроки в строку начинается с символа №', pos(p, s) + length(p));
    end;
  readln
end.


Вернуться к обсуждению:
Обработка строковых данных в языке программирования Pascal Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.03.2014, 15:09
Готовые ответы и решения:

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

Разработка программ на языке программирования Pascal
Задание: 1. разработать алгоритм решения задачи в виде блок-схемы и программу для вычисления...

Обработка строковых данных
Помогите написать программу на visual basic. В заданной строке, состоящей из слов, разделенных...

Обработка строковых данных
Прошу помощи Дана последовательность, содержащая от 2 до 30 слов, в каждом из которых от 2 до 10...

1
11.03.2014, 15:09
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.03.2014, 15:09
Помогаю со студенческими работами здесь

Обработка строковых данных
Помогите, очень нужно. Дано две строки u1='Pianino', u2='Bravissimo'. Сделать строку u3 типа...

Обработка строковых данных
Здравствуйте. Помогите вот с этими двумя заданиями : 1. Ввести предложение и слово. Определить...

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

Обработка строковых данных
Помогите пожалуйста воплотить в жизнь программный код по данной задаче: В окне происходит...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru