![]() |
|
Другие темы раздела | |
PascalABC.NET Вернуть строку, в которой символы ch1 и ch2 чередуются, и это чередование повторяется N раз
https://www.cyberforum.ru/ pascalabc-net/ thread1310881.html Разработать функцию MakeStr(ch1,ch2:char; N:integer):string, возвращающую строку, в которой символы ch1 и ch2 чередуются, и это чередование повторяется N раз. Вводятся пары символов. Используя разработанную функцию, сгенерировать строки из повторений данных символов, причем первая пара должна повторяться 1 раз, вторая пара 2 раза, пара номер i должна повторяться i раз. |
PascalABC.NET Найти строку, в которой каждый символ строки S удвоен Разработать функцию Double(const S:string):string, возвращающую строку, в которой каждый символ строки S удвоен. С помощью данной функции у каждой строки из введенного набора удвоить каждый символ. |
PascalABC.NET Написать программу, в которой описывается массив записей, хранящий информацию: наименование товара, цена
https://www.cyberforum.ru/ pascalabc-net/ thread1310875.html Написать программу, в которой описывается массив записей, хранящий следующую информацию:Наименование товара, цена.Программа должна выполнять следующие действия:ввод данных, удаление товара. Не использовать файлы. |
PascalABC.NET Напечатать фамилии студентов и название предметов, по которым они получили неуды (с помощью record)
https://www.cyberforum.ru/ pascalabc-net/ thread1310787.html написать с помощью record type date = record subject: array {1..5] of string ; mark: array {1..5] of integer; end; studrec = record name: string ; sub: date; |
Вычислить значение PascalABC.NET Помогите пожалуйста буду очень благодарен \begin{cases} \frac{a^2}{bx}+\frac{sin(x)}{a} & \text{ , } b,x,a \neq 0 \\ lg^2x+ab & \text{ , } x \gt 0 \\ tg\frac{x^2}{4}+b & \text{ , } a = 0 \end{cases} |
PascalABC.NET Изменить двумерный массив
https://www.cyberforum.ru/ pascalabc-net/ thread1310747.html Дан двумерный массив. В каждой строке все его элементы, не равные нулю, переписать (сохраняя порядок) в начало строки,а нулевые элементы - в конец массива. Новый массив не заводить. |
PascalABC.NET Программа для нахождение большего и наименьшего значения в массиве var a:array of integer; i:integer; max:integer; kmax:integer; begin randomize; for i:=1 to 100 do begin a:=random(2)+random(2)*(-1); write(a:5); https://www.cyberforum.ru/ pascalabc-net/ thread1310694.html |
Программа для выдачи комбинаций сложения/вычитания с результатом = 100 PascalABC.NET Здравствуйте, помогите пожалуйста решить задачу: " Используя все цифры от 1 до 9 по одному разу в различных комбинациях и операции сложения и вычитания, получить в сумме 100" Использовать только целый тип без подпрограмм Пример выдачи: 123 + 4 - 5 + 67 - 89 = 100 9-8 + 76-5 + 4 + 21 + 3 = 100 |
PascalABC.NET Найти самую длинную последовательность чисел, упорядоченную по возрастанию ЗАДАНИЕ 1 Составить программу с использованием базовых алгоритмов для работы с одномерными массивами. ВАРИАНТЫ ЗАДАНИЯ сформулировать вещественный массив А1(45), элементами которого являются случайные числа. Найти самую длинную последовательность чисел, упорядоченную по возрастанию. Вывести на экран исходный массив и найденную последовательность. Для последовательностей одной длины вывести... https://www.cyberforum.ru/ pascalabc-net/ thread1310618.html |
PascalABC.NET Вычислить и вывести на экран в виде таблицы значение функции, заданной графически
https://www.cyberforum.ru/ pascalabc-net/ thread1310607.html вычислить и вывести на экран в виде таблицы значение функции, заданной графически, на интервале от Хнач до Хкон с шагом dx. Интервал и шаг вводить с клавиатуры. Таблицу снабдить заголовком и шапкой. |
Составить программу, определяющую принадлежит ли точка с координатами (x;y) заштрихованной части плоскости PascalABC.NET Составить программу, определяющую принадлежит ли точка с координатами (x;y) заштрихованной части плоскости. КоОРДИНАТЫ ВВЕСТИ С КЛАВИАТУРЫ |
PascalABC.NET Поиск номера телефона по фамилии, по имени и отчеству абонента Начал проходить новый тип данных record. Пытаюсь разобраться сам, но выходит с трудом. Дана задача: Создать программу "Телефонный справочник". Справочник содержит следующую информацию: Ф.И.О. абонента, домашний адрес, номер телефона. Программа осуществляет поиск номера телефона по фамилии, по имени и отчеству абонента. Сделал наброски программы var abon1,abon2,abon3:record name, //имя... https://www.cyberforum.ru/ pascalabc-net/ thread1310552.html |
-25 / 0 / 0
Регистрация: 23.10.2014
Сообщений: 99
|
|
0 | |
Найти строку, в которой удалены все символы, совпадающие с первым - PascalABC.NET - Ответ 690048625.11.2014, 20:11. Показов 1466. Ответов 1
Метки (Все метки)
Разработать функцию DelFirst(const S:string):string, возвращающую строку, в которой удалены все символы, совпадающие с первым в строке S (также и первый символ). С помощью данной функции у каждой строки из введенного набора удалить все символы, совпадающие с первым.
Вернуться к обсуждению: Найти строку, в которой удалены все символы, совпадающие с первым PascalABC.NET
0
|
|
25.11.2014, 20:11 | |
Готовые ответы и решения:
1
Получить новую строку, в которой удалены все встречающиеся символы
Программа должна удалять все символы строки, совпадающие с первым Составьте процедуру, с помощью которой из заданного текста будут удалены все английские символы |
25.11.2014, 20:11 | |
Помогаю со студенческими работами здесь
0
Получить новую строку, в которой удалены все возможные повторные вхождения каждого слова |