|
|
| Другие темы раздела | |
| Pascal Найти номер минимального элемента массива в приведенной программе const n=6; var a:array of integer; i,imn: byte; s: integer; begin randomize; https://www.cyberforum.ru/ pascal/ thread106396.html |
В одномерном массиве, состоящем из п вещественных элементов, вычислить: Pascal 1. Сжать массив, удалив из него все элементы, величина которых находится в ин¬тервале . Освободившиеся в конце массива элементы заполнить нулями. |
|
Pascal Рекурсия: нахождение суммы ряда
https://www.cyberforum.ru/ pascal/ thread106379.html Нужно найти сумму ряда 1)рекурсией и 2) суммированием в цикле. Сделал, но явно не не правильно: Var z:real; c,n:Byte;Ps1,ps2,x,F:real; Function Sum1(n:Byte):real; Function A (n:Byte;x:real):real; Begin if n=0 Then A:=1 Else A:=A(n-1,x)*(x*x)/(n*n); End; |
Pascal Найдите ошибку в программе
https://www.cyberforum.ru/ pascal/ thread106375.html Вводиться строка из букв. На экран выведена строка, заполненная "_", количество которых совпадает с количеством загаданных букв. Надо отгадать строку, вводя по букве, если она совпала, то она встает на место. Где ошибка? var str, st:string; i:integer; c:char; begin readln(str); for i:=1 to length(str) do st:=#95; writeln(st); while st<>str do begin |
|
вычеркнуть строку и столбец на пересечении которого находится максимальный элемент Pascal "Дана матрица A(5, 5). Получить матрицу C(4, 4) вычеркивая из матрицы A строки и столбца, на пересечении которых находится максимальный элемент." - цитирую дословно с грамматическими ошибками :) голова уже не соображает, посмотрите свежим взглядом в чём ошибка? uses crt; const n = 5; var a: array of integer; c: array of integer; i,j,x,y:byte; |
Pascal Поиск точки в фигуре Мне по умолчанию дан треугольник, мне нужно ввести координаты точки и программа напишет находится ли эта точка в треугольнике, на его линии или вне треугольника. https://www.cyberforum.ru/ pascal/ thread106364.html |
|
Pascal Сжать массив, удалив из него все элементы, модуль которых находится в интервале [а, b]
https://www.cyberforum.ru/ pascal/ thread106349.html Сжать массив, удалив из него все элементы, модуль которых находится в интер*вале . Освободившиеся в конце массива элементы заполнить нулями. В чём проблема? Программа толком не работает.... Не могу найти ошибку! Думаю, что где - то здесь: " For i:=1 To n Do if (a <= abs(ar)) and (abs(ar) <= b) then " const n=10; var i,j,a,b:integer; |
Pascal Вычислить числовую последовательность при условии, n - натуральное, х - действительное Доброго времени суток, уважаемые программисты. Попогите пожалуйста написать программу на паскале. Дано: Натуральное число "n" и действительное число "x". Вычислить: |
| Pascal Найти максимальный элемент массива В одномерном массиве, состоящем из n вещественных элементов, вычислить: Максимальный элемент массива. https://www.cyberforum.ru/ pascal/ thread106316.html |
Pascal 2 задания на тему строки
https://www.cyberforum.ru/ pascal/ thread106309.html Здраствуйте. Помогите решить задачи: 1 Проверить, какая из 2ух букв 'а' или 'е' встречается чаще. 2 Задан текст, распечатать номера позиций на которых встречается буква 'к' |
|
Pascal Целой переменной k присвоить первую цифру из дробной части положительного вещественного числа как присвоить целой переменной k первую цифру из дробной части положительного вещественного числа? если кто знает скажите плиз? |
Pascal написание программы используя оператор if Люди помогите зделать програмку. Если сумма трех попарно разных действительных чисел меньше единици, тогда меншее с этих трех чисел заменить полусумой двух других; в другом случае заменить меншее с х и у полусуммой двух значений, которые остались. Всех за ранее благодарю! Добавлено через 2 часа 16 минут помогите плизик Добавлено через 34 минуты вот мои отчаянные попытки что либо сделать https://www.cyberforum.ru/ pascal/ thread106304.html |
|
4 / 3 / 0
Регистрация: 08.12.2009
Сообщений: 63
|
|
| 19.03.2010, 12:47 [ТС] | 0 |
Написать программу, которая подсчитывает количество слов начинающихся на заданную букву в заданной символьной строке. - Pascal - Ответ 60859419.03.2010, 12:47. Показов 3981. Ответов 2
Метки (Все метки)
Ответ
сори..... забылся, пасиб ))
Вернуться к обсуждению: Написать программу, которая подсчитывает количество слов начинающихся на заданную букву в заданной символьной строке. Pascal
0
|
|
| 19.03.2010, 12:47 | |
|
Готовые ответы и решения:
2
Определить количество слов, начинающихся на заданную букву в строке Написать программу, которая находит количество знаков препинания в заданной символьной строке.
Написать программу, которая подсчитывает количество слов в предложении. |
| 19.03.2010, 12:47 | |
| 19.03.2010, 12:47 | |
|
Помогаю со студенческими работами здесь
0
Определить в строке количество слов, начинающихся с заданной буквы Разработать программу, которая подсчитывает количество однокоренных слов |
Новые блоги и статьи
|
|||||
|
Как преобразовать список списков в простой список в Python
bytestream 22.01.2025
При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .
|
Что такое GUID / UUID и как их создать
bytestream 22.01.2025
В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .
|
Как добавить пустую директорию в репозиторий Git
bytestream 22.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с ситуацией, когда необходимо сохранить пустую директорию в репозитории. Данная задача может показаться простой на первый. . .
|
Как валидировать адрес email в JavaScript
bytestream 22.01.2025
JavaScript, как основной язык веб-разработки, предоставляет разработчикам множество инструментов для реализации эффективной валидации email-адресов. От простых встроенных решений до сложных. . .
|
Как заменить все вхождения подстроки в JavaScript
bytestream 22.01.2025
Строки в JavaScript представляют собой неизменяемые последовательности символов, что делает их обработку особенно интересной с точки зрения оптимизации и выбора правильного подхода к решению задач.
. . .
|
Управление версиями пакетов в Node.js. В чем разница между тильдой (~) и кареткой (^) в package.json
bytestream 22.01.2025
В современной разработке программного обеспечения управление версиями пакетов играет ключевую роль в обеспечении стабильности и надежности проектов. Node. js, как одна из самых популярных платформ для. . .
|
|
Аутентификация на сайте с помощью формы
bytestream 21.01.2025
В современном цифровом мире безопасная аутентификация становится краеугольным камнем защиты веб-приложений и пользовательских данных. Каждый день миллионы людей используют различные онлайн-сервисы,. . .
|
Как получить индекс в цикле for в Python
bytestream 21.01.2025
При работе с коллекциями данных в Python часто возникает необходимость не только получить доступ к элементам последовательности, но и знать их позицию в процессе итерации. Индексация в циклах. . .
|
Как определить адрес, из которого локальный репозиторий Git был клонирован
bytestream 21.01.2025
В современной разработке программного обеспечения система контроля версий Git стала неотъемлемой частью рабочего процесса. При работе с Git разработчики часто сталкиваются с необходимостью. . .
|
Какая разница между операторами == и === в сравнениях в JavaScript
bytestream 21.01.2025
В мире веб-разработки JavaScript занимает особое место как динамический язык программирования, предоставляющий разработчикам широкий набор инструментов для создания интерактивных веб-приложений. . . .
|
Из чего и как собрать свой домашний кинотеатр
bt_guru 21.01.2025
Создание домашнего кинотеатра: от идеи до реализации
В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .
|
Ошибки стиральных машин
bt_guru 21.01.2025
Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .
|
Наверх