|
|
| Другие темы раздела | |
| Turbo Pascal Найти высоту и биссектрису треугольника Вот условие: " Трикутник задано координатами вершин А(0;0), B(і;і-1), С(-і;і+1) (буква "і"=16) Обчислити висоту hc та бісектрису Wa" трикутник не прямокутний! Заранее благодарю! https://www.cyberforum.ru/ turbo-pascal/ thread355126.html |
Решение СЛАУ Turbo Pascal Решение СЛАУ. Для Turbo Pascal. |
| Turbo Pascal Алгоритм циклического кодирования Добрый вечер всем. Нужно выполнить на Pascal (и одновременно на Assembler) процедуру циклического кодирования с помощью функции исключающего или. Кто-нибудь сталкивался с реализацией? https://www.cyberforum.ru/ turbo-pascal/ thread355118.html | Turbo Pascal сортировка массив дан массив А(10). найти максимальный элемент массива, упорядочить элементы, следующие за ним по убыванию. желательно с блок схемой https://www.cyberforum.ru/ turbo-pascal/ thread355114.html |
|
Проверка файла на его существование. Turbo Pascal Продолжаю писать программу:),в которой поддерживается процедура удаления файла.Необходимо выполнить проверку на существование данного файла. procedure delfiles;{udalenije files} begin Assign(f1,'f1.txt'); {$I-} Reset(f1); {$I+} if IOresult<>0 then Begin |
Turbo Pascal Биты и символы
https://www.cyberforum.ru/ turbo-pascal/ thread355105.html 1)Был текст, состоящий из заглавных букв латинского алфавита. К нему применили преобразование RLE, то есть заменили n>1 подряд идущих символов x на строку nx. Восстановите исходный текст. Описание входа: Входной файл содержит результат применения к некоторой строке, содержащей не более 10000 символов, преобразования RLE. Описание выхода: Выведите в выходной файл исходную строку. Пример:... |
|
Turbo Pascal Вычислить сумму ряда
https://www.cyberforum.ru/ turbo-pascal/ thread355069.html Дано вещественное число X и целое число N (> 0). Вывести X – X3/3! + X5/5! – ... + (–1)NX2N+1/(2N+1)! (N! = 1•2•...•N). Полученное число является приближенным значением функции sin в точке X. если может знает кто еще это как делать, помогите плз |
Turbo Pascal Поиск максимального и минимального значения массива (блок-схема) write('Ввести значення a,b= '); readln (a,b); writeln (' a= ',a:5:2,' b=',b:5:2, ' c=',c:5:2); begin x:=a; y:=sqr(x)+ sqr(sin((x+3.14)/2)/cos((x+3.14)/2)); ymax:=y; ymin:=y; c1: if (x<=0.5) then y:=sqr(x)+ sqr(sin((x+3.14)/2)/cos((x+3.14)/2)); if (x>-0.5) and (x<=0.5) then y:=Cos(Exp(ln(abs(x+ln(abs(x)))*1/5))); if (x>0.5) then ... |
|
Turbo Pascal Вычислить сумму ряда
https://www.cyberforum.ru/ turbo-pascal/ thread355067.html var x, y, pow, R: real; l: integer; begin writeln ('введите число'); readln (x); writeln ('введите показатель степени'); readln (y); if (x < 0) then pow := (-1)*Exp(y*Ln(Abs(x))) else if (x > 0) then pow := Exp(y*Ln(Abs(x))) else Pow := 0; l := round(y); if (l mod 2 = 0) then R:=Abs(pow); |
Turbo Pascal Заполнить двумерный массив словами через пробел как заполнить двумерный массив словами через пробел, а не через entert. https://www.cyberforum.ru/ turbo-pascal/ thread355034.html |
|
Turbo Pascal Даны два слова (первое длиннее второго). Заменить в первом слове соответствующее количество символов на второе слово. например вводишь : 12345 678 он должен вывести 67845 var a,b:string; begin |
Turbo Pascal Проверить истинность высказывания
https://www.cyberforum.ru/ turbo-pascal/ thread355027.html Я в Паскале нубок, мне очень нужна ваша помощь, помогите с задачами плз.... Begin25. Проверить истинность высказывания: "Данное целое число является четным двузначным числом". Begin42. Даны три целых числа. Возвести в квадрат отрицательные числа и в третью степень — положительные (число 0 не изменять). Begin96. Дано вещественное число X (|X| < 1) и целое число N (> 0). Вывести ... |
|
0 / 0 / 1
Регистрация: 17.06.2011
Сообщений: 34
|
|
| 24.09.2011, 19:18 [ТС] | 0 |
Удалить в текстовом файле все слова со скобками вместе со скобками, - Turbo Pascal - Ответ 201086224.09.2011, 19:18. Показов 1775. Ответов 16
Метки (Все метки)
Ответ
а ту программу(процедуру) которую ты написал выше она содержит их:
1assign 2reset 3rewrite 4close Вернуться к обсуждению: Удалить в текстовом файле все слова со скобками вместе со скобками, Turbo Pascal
0
|
|
| 24.09.2011, 19:18 | |
|
Готовые ответы и решения:
16
В заданном тексте удалить все фрагменты, заключенные в круглые скобки (вместе со скобками) |
| 24.09.2011, 19:18 | |
| 24.09.2011, 19:18 | |
|
Помогаю со студенческими работами здесь
0
Строки. Удалить часть символьной строки,заключенной в скобки (вместе со скобками)
Удалить часть текста, заключённую в скобки вместе со скобками. Внутри каждой пары скобок нет других скобок. Удалить все символы строки, расположенные между круглыми скобками |