|
|
| Другие темы раздела | |
| Turbo Pascal Найти сумму и количество положительных элементов, расположенных между минимальным и максимальными задание написать программу с блок -схемой используя одномерный массив.Дан массив A(30).Найи сумму и количество положительных элементов, расположнных между минимальным и максимальными элементами массива.Заранее спасибо!!!!:) Добавлено через 2 часа 8 минут Выручайте https://www.cyberforum.ru/ turbo-pascal/ thread251546.html |
Turbo Pascal Дана строка, состоящая из букв и цифр. Найти сумму всех цифр, входящих в эту строку. Дана строка, состоящая из букв и цифр. Найти сумму всех цифр, входящих в эту строку. if s in then begin val(s,X,cod); sum:=sum+X; end; почему результат не выводит ? ) |
|
Turbo Pascal Вычислить значение многочлена
https://www.cyberforum.ru/ turbo-pascal/ thread251543.html 7х в степени 7 плюс 6х в степени 6 плюс 5х в степени 5 плюс 4х в степени 4; и еще одну прогу чтобы затабулировать эту функцию спомощью операторов циклов for while repeat x принадлежит n=10 |
Turbo Pascal Записи Написать программу, определяющую количество авто. Для каждого владельца известны количество авто (тип integer), марка автомобиля (тип string), фамилия (тип string). https://www.cyberforum.ru/ turbo-pascal/ thread251536.html |
|
Turbo Pascal Найти пару кругов, имеющих наибольшую площадь и не перекрывающих друг друга Помогите написать, заранее благодарен. Четыре круга заданы радиусами и координатами своих центров на плоскости. Найти пару кругов, имеющих наибольшую площадь и не перекрывающих друг друга. |
Turbo Pascal Найти сумму ряда, используя смешанный кэффициент
https://www.cyberforum.ru/ turbo-pascal/ thread251517.html Задали задание, описанное в заголовке темы. S=\cos(x)+ \frac{\cos (3x)}{{3}^{2}}+...+ \frac{\cos(2n-1)*x}{{(2n-1)}^{2}} n=40 Коэффициент вычисляется по формуле k=\frac{{a}_{n}}{{a}_{n-1}} Потом выделяется {k}^{'} (результат сокращения и не тригонометрические функции) и {k}_{slozhnoe} (тригонометрические функции) На лекциях этого не было. На практике была разобрана всего 1 подобная... |
|
Turbo Pascal Записи
https://www.cyberforum.ru/ turbo-pascal/ thread251505.html имеется n аудиокассет про каждую известно, что кол-во записей не превышает 20-ти. название продолжительность (в минутах) жанр (рок,романс,попса) Найти и вывести название и продолжительность самой длинной песни Найти и вывести название жанр и продолжительность самого короткого произведения |
Подсчет количеста аннаграм =) Turbo Pascal Здравствуйте var s, s1: string; i, j, kol, fac, fact, res, q: longint; begin readln(s); q:= 1; fac:= 1; for i:= 1 to length(s) do begin |
| Turbo Pascal обработка файлов 1. Создайте файл f, компоненты которого являются действительными числами. Напишите программу вычисления суммы компонент файла f и наименьший компонент файла. 2. Создайте текстовый файл p так, что бы он был разбит на непустые строки. Напишите программу для подсчета числа строк, которые состоят из одинаковых литер. https://www.cyberforum.ru/ turbo-pascal/ thread251472.html | Turbo Pascal Вычислить сумму S=1*2+2*3*4+3*4*5*6+...+n(n+1)...2n. Вот такое вот задание: дано натуральное число n= 15. Вычислить сумму S=1*2+2*3*4+3*4*5*6+...+n(n+1)...2n. Вот такая получилась программа: n:=15; s:=0; for i:=1 to 15 do begin k:=i; https://www.cyberforum.ru/ turbo-pascal/ thread251460.html |
|
Turbo Pascal Если скобки расставлены правильно (т.е. каждой открывающейся соответствует одна закрывающаяся), то вывести число 0 Дана строка, содержащая несколько круглых скобок. Если скобки расставлены правильно (т.е. каждой открывающейся соответствует одна закрывающаяся), то вывести число 0. В противном случае вывести или номер позиции, в которой расположена 1-ая ошибочно закрывающаяся скобка, или, если закрывающихся скобок не хватает, число - 1. |
Turbo Pascal Определить максимальное и минимальное значения массива
https://www.cyberforum.ru/ turbo-pascal/ thread251415.html Создать программу, определяющую максимальное и минимальное значения массива(если можно с комментариями чтоб было понятно) |
|
Nevaada
|
|
| 0 | |
Рассчитать ввп и рассортировать по убыванию - Turbo Pascal - Ответ 141729303.03.2011, 14:35. Показов 687. Ответов 0
Метки (Все метки)
Вернуться к обсуждению: Рассчитать ввп и рассортировать по убыванию Turbo Pascal |
|
| 03.03.2011, 14:35 | |
|
Готовые ответы и решения:
0
Рассортировать главную диагональ по убыванию Рассортировать положительные числа по убыванию, а отрицательные по возрастанию Рассортировать по убыванию методом выбора массив, взятый из файла.
|
| 03.03.2011, 14:35 | |
| 03.03.2011, 14:35 | |
|
Помогаю со студенческими работами здесь
0
Рассортировать числа по убыванию методом выбора и удалить нулевые значения Рассортировать слова исходного перечня слов одинаковой длины a$ по убыванию суммы их ASCII - кодов Рассортировать массив по убыванию числа от начала массива до первого экстремума, от первого до второго, от второго до конца массива. Увеличение номинального ВВП |