Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Составить программму, которая находит произведение элементов, меньших среднего арифметического всех элиментов составить программму, которая находит произведение элиментов, меньших среднего арифметического всех элиментов, сумму элиментов, больших среднего арифметического, в массивах X(6) и Y(8). вычисление суммы и произведения оформить в виде подпрограммы. помогите пожалуйста, и если можно с коментариями что к чему. https://www.cyberforum.ru/ pascal/ thread111916.html в файле количество слов, начинающихся с а Pascal
Имеется текстовый файл, в каждой строке которого записано произвольное количество слов, отделенных одним или несколькими пробелами. Длина строки не более 255 символов. Количество строк заранее низвестно. Написать программу, считающую в файле количество слов, начинающихся с а
Pascal В матрице n-го порядка найти максимальный элемент среди элементов https://www.cyberforum.ru/ pascal/ thread111869.html
В матрице n-го порядка найти максимальный элемент среди элементов, лежащих выше побочной диагонали, и минимальный среди элементов, лежащих ниже главной диагонали.
Pascal Составить программу табулирования функции https://www.cyberforum.ru/ pascal/ thread111865.html
Помогите проверить задачу (Составить программу табулирования функции ln (x + √ (x + y)) в прямоугольнике x с шагом табуляциы h. a=0;b=2;c=1;d=2;h=0.1) Вот моя программа program aa; uses crt; const a=0; b=2; c=1; d=2; h=0.1; var x,y,f,k,l:real;
заменить нулями числа в матрице Pascal
Дана квадратная матрица порядка M. Заменить нулями элементы матрицы, лежащие выше побочной диагонали
Pascal Посчитайте количество положительных элементов заданного массива А[10]. https://www.cyberforum.ru/ pascal/ thread111839.html
Посчитайте количество положительных элементов заданного массива А.
Pascal Дано целое число N и набор из N вещественных чисел..... Дано целое число N и набор из N вещественных чисел. Если данный набор образует убывающую последовательность, то вывести 0; в противном случае вывести номер первого числа, нарушающего закономерность. https://www.cyberforum.ru/ pascal/ thread111838.html Pascal Укажите номер строки программы, в которой допущена ошибка, поставьте запятую, а затем без пробелов запишите строку правильно.
Укажите номер строки программы, в которой допущена ошибка, поставьте запятую, а затем без пробелов запишите строку правильно. program rt; var list: array of integer; indx: integer; a:integer; begin writeln('введите а'); read(a); if a=2 then exit;
Pascal Даны координаты вершин треугольника и точки внутри него. Найти расстояние от данной точки до ближайшей стороны треугольника. Друзья, я уже видел темы, где люди просили написать прогу и видел отказы, так как вопросы - пожалуйста, а прогу пиши сам. Это правильно, но у меня как бы такая ситуация: дали 3 задания, которые я сделал, написал три проги, и дали сложное необязательное задание, за которое или поставят 5 или ничего. Но мы его не проходили, поэтому "делай как хочешь". Если поможете - будет супер. "Даны... https://www.cyberforum.ru/ pascal/ thread111818.html Pascal Дана непустая последовательность ненулевых целых чисел, за которой следует 0(0 - признак конца последовательности) Дана непустая последовательность ненулевых целых чисел, за которой следует 0(0 - признак конца последовательности) Определить, сколько из них принимает наименьшиее значение. Через массив я знаю как сделать, а вот как сделать без него! Добавлено через 17 часов 56 минут помогите пожалуйста... https://www.cyberforum.ru/ pascal/ thread111788.html
рекурсивный подъем и... Pascal
здравствуйте, дана строка(последовательность слов), в 3-м слове удалить все вхождения последней буквы строки, с использованием рекурсивного спуска, подъема, и без рекурсии(с использованием цикла). Я разбил строку на слова и записал каждое слово в массив, для подальшей работы только с 3-м элементом массива. Рекурсивный спуск работает, подъем - просто выводит 3-е слово без изменений, а процедура...
Pascal вставка в массив(паскаль) Помогите плиз написать програмку,вставляющую 2 пробела до всех символов,не принадлежащих некоторому множеству,задаваемому с клавиатуры.Нужно очень срочно... https://www.cyberforum.ru/ pascal/ thread111764.html
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
02.04.2010, 13:24 0

В одномерном массиве из 10 чисел есть положительные и отрицательные числа. Вычислить сумму положительных чисел. - Pascal - Ответ 637053

02.04.2010, 13:24. Показов 2486. Ответов 2
Метки (Все метки)

Ответ

После первого begin нужно
Pascal
1
sum := 0;


Вернуться к обсуждению:
В одномерном массиве из 10 чисел есть положительные и отрицательные числа. Вычислить сумму положительных чисел. Pascal
1
Заказать работу у эксперта
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
02.04.2010, 13:24
Готовые ответы и решения:

В одномерном массиве из 10 чисел положительные элементы уменьшить вдвое, а отрицательные заменить индексами
Помогите, пожалуйста решить.

В последовательности действительных чисел a1, a2, …, an есть только положительные и отрицательные элементы. Вычислить произведение отрицательн
В последовательности действительных чисел a1, a2, …, an есть только положительные и...

В одномерном массиве вычислить максимальное число подряд идущих положительных чисел
1). В одномерном массиве вычислить максимальное число подряд идущих положительных чисел, не...

Определить есть ли в массиве положительные, отрицательные числа и нули
Дан одномерный массив. Определить есть ли в этом массиве положительные, отрицательные числа и нули....

2
02.04.2010, 13:24
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
02.04.2010, 13:24
Помогаю со студенческими работами здесь

В последовательности действительных чисел a1, a2, ..., aN есть только положительные и отрицательные элементы.
Я понимаю что это очень простая и глупая задачка.. но у меня ступор некий возник.. -->в...

Заменить все отрицательные числа в массиве на положительные , а положительные на отрицательные
Существует двумерный массив произвольной размерности . Заменить все отрицательные числа в массиве...

В массиве из 10 чисел есть положительные и отрицательные элементы. Вычислить сумму отрицательных элементов массива
Помогите пожалуйста!

В массиве A, содержащем 10 положительных и отрицательных целых чисел, вычислить сумму положительных элементов
2.В массиве A, содержащем 10 положительных и отрицательных целых чисел, вычислить сумму...

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
Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru