|
|
| Другие темы раздела | |
|
Turbo Pascal Получить сумму положительных и число отрицательных элементов массива дан одномерный массив из n элементов в диапазоне от -50 до 50. получить сумму положительных и число отрицательных элементов массива. program mas; uses crt; var a:array of integer; i,n,s,k:integer; begin clrscr; write('Введите количество элементов массива n='); readln(n); for i:=1 to n do |
Turbo Pascal Задание с массивом Дано задание: В одномерном массиве вычислить индекс и значение элемента у которого парный индекс и значение ближайшее к значению 6 в анализируемой области(парные индексы). |
|
Найти три наибольших элемента одномерного массива Turbo Pascal Вот задание которые не понятно "Найти три наибольших элемента одномерного массива X(20)." Думаю, ничего сложного. Сначала даем значение каждому элементу массива и сразу же выводим. Потом ищем самый наибольший элемент(пункт 12). Затем 2-ой(при условии что он не равен самому наибольшему). А... |
Turbo Pascal Возвести число в степень
https://www.cyberforum.ru/ turbo-pascal/ thread989681.html возвести число, а в степень к, число а и к могут принимать любые вещественные положительные значения. var a,k:real; begin readln(a,k); if (a>0) and (k>0) then begin a:=exp(k*ln(a)); writeln(a); end; end. |
|
Turbo Pascal Вычислить среднее арифметическое чисел, не больших А и стоящих на четных местах помогите решить задачу. Вычислить среднее арифметическое чисел, небольших А и стоящих на четных местах; подсчитать количество ненулевых чисел. |
Turbo Pascal Матрицы
https://www.cyberforum.ru/ turbo-pascal/ thread989659.html Решить поставленную задачу, используя средства управления вводом/выводом. Каждым элементом массива L(8) является целочисленная строка длиной 15. Вывести на экран элементы массива L в два столбца:... |
|
Для числовой последовательности фиксированной длины найти минимальный элемент Turbo Pascal Для числовой последовательности фиксированной длины найти: 1)минимальный элемент 2)максимальный элемент. 3)Их позиции. uses crt; var a : array of integer; n, i, imax, imin : byte; max, min : integer; begin randomize; max := -1000; min := 1000; clrscr; |
Turbo Pascal Определить число сотен в числе дано натуральное число n (n>99) определить число сотен в нем. var n:integer; begin readln(n); writeln(n div 100); end. |
|
Turbo Pascal Найти площадь треугольника Дан равнобедренный треугольник со сторонами a,b,c найти площадь треугольника var a, b, c, p, s : real; begin repeat writeln('введите стороны равнобедренного треугольника A=B, и С'); readln(a, b, c) until (a > 0) and (b >0) and (c > 0) and (a = b) and (a... |
Turbo Pascal Определить, является ли четным введенное пользователем целое число опрелделить является ли четным введенное пользователем целое число var x:integer; begin readln(x); if x mod 2 = 0 then writeln(x); end. https://www.cyberforum.ru/ turbo-pascal/ thread989677.html |
|
Turbo Pascal Упорядочить последовательность Помогите с лабой, вот задание. Дана последовательность целых чисел. Вывести упорядоченную по невозрастанию последовательность, состоящую из чисел данной последовательности, находящихся между... |
Turbo Pascal Матрицы
https://www.cyberforum.ru/ turbo-pascal/ thread989668.html Решить поставленную задачу, используя средства управления вводом/выводом. Каждым элементом массива L(8) является целочисленная строка длиной 15. Вывести на экран элементы массива L в два столбца:... четные строки справа, нечетные слева то есть элементы массива L с четными (нечетными) номерами? Добавлено через 50 секунд и выполнить с помощью матрицы? |
|
0 / 0 / 0
Регистрация: 30.12.2011
Сообщений: 38
|
|
| 0 | |
Подсчитать, сколько раз среди заданных символов встречаются символ + и сколько раз символ * - Turbo Pascal - Ответ 524456427.10.2013, 17:58. Показов 1681. Ответов 1
Метки (Все метки)
Вернуться к обсуждению: Подсчитать, сколько раз среди заданных символов встречаются символ + и сколько раз символ * Turbo Pascal
0
|
|
| 27.10.2013, 17:58 | |
|
Готовые ответы и решения:
1
Ввести строку. Подсчитать сколько раз в ней встречаются строчные и сколько раз заглавные русские буквы |
| 27.10.2013, 17:58 | |
|
Помогаю со студенческими работами здесь
0
|
Новые блоги и статьи
|
||||
|
JUnit или TestNG: Выбираем Java-фремворк для тестирования
Javaican 20.03.2025
История тестовых фреймворков в Java началась в конце 90-х, когда Кент Бек и Эрих Гамма разработали JUnit - инструмент, который перевернул представление разработчиков о модульном тестировании. JUnit. . .
|
Разбиваем монолит на два микросервиса и реализуем CI/CD
ArchitectMsa 20.03.2025
Когда команда растет, а функциональность монолита расширяется, поддерживать и развивать такую систему становится все труднее. Разработчики начинают тратить много времени на разбор сложных. . .
|
Python и PDF: Создание и редактирование файлов
py-thonny 20.03.2025
Работа с PDF-документами – одна из популярных задач в современной разработке. Python предлагает несколько инструментов для создания, чтения и редактирования PDF-файлов, среди которых особенно. . .
|
Корутины в Unity и производительность WaitForSeconds
GameUnited 20.03.2025
Разработчики игр на Unity часто сталкиваются с вопросом: как выполнять действия через определённые промежутки времени, не блокируя основной поток игры? Тут как раз и приходят на помощь корутины —. . .
|
Криптография в PHP
Jason-Webb 20.03.2025
PHP предоставляет много криптографических возможностей: от встроенных функций хеширования до полноценных библиотек шифрования — арсенал средств довольно обширен. Но всё это бесполезно без понимания. . .
|
|
Lineedge (Semi-Alpha) 0.75@20: Что мы потеряли
Etyuhibosecyu 20.03.2025
С каждым новым стандартом Lineedge обретает новые возможности — это ясно, как божий день. Однако есть и другая сторона — избавление от устаревших и проблемных элементов. Обычно удаление. . .
|
Реализация перечислений в Go
golander 19.03.2025
Если вы перешли на Go с других языков программирования (как я), таких как C#, Java или Python, вы наверняка заметили, что Go не имеет встроенной поддержки перечислений (enumerations). Это может стать. . .
|
Шаблон API Gateway в микросервисной архитектуре
MatrixArchitect 19.03.2025
API Gateway — один из основных компонентов микросервисной архитектуры. Фактически, API Gateway представляет собой сервис, который располагается между клиентскими приложениями и бэкенд-микросервисами,. . .
|
C++26: Что мы потеряли
bytestream 19.03.2025
С каждым новым стандартом C++ обретает новые возможности — это ясно, как божий день. Однако есть и другая сторона — избавление от устаревших и проблемных элементов. Обычно удаление функциональности. . .
|
Async/await в C#: Асинхронное программирование в действии
UnmanagedCoder 19.03.2025
Разработка современных приложений немыслима без понимания асинхронного программирования. Если вы когда-либо создавали приложение, которое взаимодействует с внешними ресурсами — будь то работа с. . .
|