|
|
| Другие темы раздела | |
|
Turbo Pascal Вычисление десятичного логарифма в подпрограмме
https://www.cyberforum.ru/ turbo-pascal/ thread313419.html создать модуль, который обеспечивает вычисление суммы квадратов и разности квадратов двух вещественных величин в "procedure " и вычисление десятичного логарифма в подпрограмме "function" |
Turbo Pascal Определить периметры n-угольников Определить периметры n-угольников,координатами их вершин заданы в массивах x,y.Длину стороны n-угольников вычислять в подпрограмме.пожалуйста,помогите решить,как делать без понятия |
|
Turbo Pascal Вычислить сумму тех натуральных чисел от 1 до 50, которые кратны числу, вводимому с клавиатуры
https://www.cyberforum.ru/ turbo-pascal/ thread313407.html Написать программу, которая вычисляет сумму тех натуральных чисел от 1 до 50, которые кратны числу. вводимому с клавиатуры. При вводе числа 0 - выход из программы. |
Turbo Pascal Turbo Pascal x64
https://www.cyberforum.ru/ turbo-pascal/ thread313405.html На 64 бита не идёт что ли? ФП шёл. |
|
Turbo Pascal Движение шарика по заданной траектории |
Turbo Pascal По номеру года определить его название
https://www.cyberforum.ru/ turbo-pascal/ thread313399.html В восточном календаре принять 60-летний цикл, состоящий из 12-летних подциклов, обозначаемых цветами: зеленый, красный, желтый, белый и черный. В каждом подцикле года носят названия животных: крысы, коровы, тигра, зайца,дракона, змеи, лошади, овцы, обезьяны, курицы, собаки и свиньи.По номеру года определить его название, если 1984год-начала цикла: "год зеленой крысы" |
| Turbo Pascal Экономическая Вычислить, каким был максимальный курс акций фирмы после четырех торгов на бирже. Курс акций = Дивиденд/Ссудный процент*100 (массив - курс акций). Заранее спасибо...) https://www.cyberforum.ru/ turbo-pascal/ thread313392.html |
Программирование циклических вычислительных процессов Turbo Pascal Задано начало бесконечного числового ряда 1,-1/1!, 1/2!, -1/3! ... Вычислить сумму первых членов ряда, которые по абсолютной величине больше E. Помогите составить паскаль программу. |
| Turbo Pascal Создание и просмотр списка Посмотрите пожалуйста. Попыталась сделать список и просмотреть его, но не пойму сама что получилось и что делается... как исправить это? uses crt; type spisok =^zap; zap= record inf: integer; next: spisok; end; var beg,tek,pred: spisok; label 1; begin https://www.cyberforum.ru/ turbo-pascal/ thread313390.html |
Turbo Pascal Определить, делится ли число на 5 без остатка
https://www.cyberforum.ru/ turbo-pascal/ thread313383.html Проверить делится ли целое число x на 5 без остатка. uses crt; var a:integer; begin clrscr; writeln('Vvedite chislo'); readln(a); if (a mod 5=0) then writeln('chislo delitsa na 5 bez ostatka') else writekn('chislo ne delitsa na 5 bez ostatka') |
|
Ряды. Функции. Turbo Pascal Помогите пожалуйста. Ряд: 1-1/4x+(1*5)/(4*8)x^2-(1*5*9)/(4*8*12)x^3+...бесконечно Функция: (1-x)^(-1/4) Помогите пожалуйста!!! Решение через какие-то модули |
Turbo Pascal бесконечная сумма Помогите, пожалуйста, посчитать бесконечную сумму в Паскале (-1^(k-1))*((x^(2k-1))/(2k-1)!) при k от единицы до бесконечности, НЕ используя знаков степени (БЕЗ "^" и "exp") https://www.cyberforum.ru/ turbo-pascal/ thread313372.html |
|
1 / 1 / 0
Регистрация: 05.06.2011
Сообщений: 6
|
|
| 0 | |
Дана символьная строка. Если какой-то символ в ней встречается более одного раза, оставить только первое вхождение - Turbo Pascal - Ответ 172781905.06.2011, 14:54. Показов 4200. Ответов 3
Метки (Все метки)
Дана символьная строка. Если какой-то символ в ней встречается более одного раза, оставить только первое вхождение Вернуться к обсуждению: Дана символьная строка. Если какой-то символ в ней встречается более одного раза, оставить только первое вхождение Turbo Pascal
0
|
|
| 05.06.2011, 14:54 | |
|
Готовые ответы и решения:
3
|
| 05.06.2011, 14:54 | |
| 05.06.2011, 14:54 | |
|
Помогаю со студенческими работами здесь
0
Строка: Если какой-то символ встречается в строке > 1, второе вхождение символа заменить на 2, третье - на 3 и т.д.
|