Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Добавить в конец файла Name1 содержимое файла Name2. помогите написать програму Даны два текстовых файла Name1 и Name2. Добавить в конец файла Name1 содержимое файла Name2. https://www.cyberforum.ru/ turbo-pascal/ thread88364.html Cуществует ли Программа для построения блок-схем по коду Turbo Pascal
Люди, есть ли программа для построения блок-схем по коду программы для турбо паскаля?
Turbo Pascal Найти для строки такое натуральное i, что si – последняя по порядку запятая. https://www.cyberforum.ru/ turbo-pascal/ thread88305.html
Даны натуральное число n, символы s1, …, sn. Известно, что среди s1, …, sn есть по крайней мере одна запятая. Найти такое натуральное i, что si – последняя по порядку запятая.
Turbo Pascal Упорядочить слова по возрастанию длинны. https://www.cyberforum.ru/ turbo-pascal/ thread88287.html
Последовательность слов переменной длинны (от 1 до 10 символов) может содержать максимально 10 слов. Слова разделяются пробелом, последовательность заканичвается точкой. Упорядочить слова по возрастанию длины. Знает кто??
Упорядочит по возростанию чётные и не чётные элементы массива Turbo Pascal
Добрый день! у меня возникла проблемка с алгоритмом. Вобщем задание звучит таким образом Дан одномерный масив. В нём найти 1) произведение положительных элементов и 2) сумму всех элементов масиве не включая минимальный. Первые 2 задания я зделал но 3 задание звучит таким образом: упорядочит по возростанию отдельно чётные и не чётные элементы массива! Кто знает, помогите пожалуйста. вот алгоритм...
Turbo Pascal Проверить, делится ли заданное четырехзначное число нацело Проверить, делится ли заданное четырехзначное число нацело на произведение цифр, составляющих это число в случае целого и вещественного типа числа. https://www.cyberforum.ru/ turbo-pascal/ thread88270.html
Turbo Pascal исправьте ошибки а то результат не тот https://www.cyberforum.ru/ turbo-pascal/ thread88265.html
тут 3 задачи плиззз оч надо...выдает неправельные результаты....как исправить незнаю
Найти значение выражения Turbo Pascal
Turbo Pascal Преобразовать семиразрядное двоичное число в десятичное https://www.cyberforum.ru/ turbo-pascal/ thread88187.html
Помогите решить контрольную в turbo pascal ! написать программу,которая преобразует введенне с клавиатуры семиразрядное двоичное число в десятичное
Turbo Pascal Сортировка записей по алфавиту. Найти ошибку https://www.cyberforum.ru/ turbo-pascal/ thread88053.html
Вот так выглядит задача: Сведения об экспорте товара состоят из наименования товара, страны и количества экспорта в эту страну. Дан набор из 1000 таких сведений. Найти: а) страны, в которые экспортировался данный товар, и общий объем его экспорта. б) упорядочить сведения о товарах лексикографически по первым двум буквам наименования товара. Вот так выглядит код: Program task05; type...
Turbo Pascal Подсчитать сумму ряда
Пожалуйста
Turbo Pascal Создать файл, компоненты https://www.cyberforum.ru/ turbo-pascal/ thread87987.html
помогите написатть програму Создать файл, компоненты (<=10) которого являются символами, а потом поменять местами значение первой и последней компонентов файла. Исходный и результирующий файлы вывести на экран.
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
21.01.2010, 23:11 0

Напечатать все символы между первой и второй точками. - Turbo Pascal - Ответ 495526

21.01.2010, 23:11. Показов 1576. Ответов 2
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
var
  S:string;
  N:integer;
begin
  ReadLn(S);
  N:=Pos('.',S);
  WriteLn(Copy(S,N+1,Pos('.',Copy(S,N+1,Length(S)))-1))
end.
при желании конечно можно и N выкинуть
Pascal
1
2
3
4
5
6
var
  S:string;
begin
  ReadLn(S);
  WriteLn(Copy(S,Pos('.',S)+1,Pos('.',Copy(S,Pos('.',S)+1,Length(S)))-1))
end.


Вернуться к обсуждению:
Напечатать все символы между первой и второй точками. Turbo Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.01.2010, 23:11
Готовые ответы и решения:

Напечатать все символы, расположенные между первой и второй запятой в предложении
Дано предложение. Напечатать все символы, расположенные между первой и второй запятой. Если второй...

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

Напечатать все символы между первой и второй точками
А как такое сделать? Даны натуральное число n и символы S1..Sn, среди которых есть точки....

Напечатать все символы, расположенные между первой и второй запятой
Пожалуйста помогите решить. Дано предложение. Напечатать все символы, расположенные между первой и...

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

Удалить из предложения все символы, расположенные между первой и второй запятыми
1. Удалить из предложения все символы МЕЖДУ первой и второй запятыми. 2. Дано предложение, удалить...

Вывести на экран и в новый файл все символы исходного файла, расположенные между первой и второй точкой
Вывести на экран и в новый файл все символы исходного файла, расположенные между первой и второй...

Напечатать все символы между первой и второй точками
Даны натуральное число n и символы S1 и Sn,среди которых есть точка. Напечатать все символы между...

Удалить из строки все символы, расположенные между первой и второй точками
Здравствуйте, помогите пожалуйста с заданием Задание: Дана строка символов, которая включает,...

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