Ввести 10 чисел и посчитать сумму положительных. - Pascal

Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.71/21:

@Garek1 0 / 0 / 0 Регистрация: 06.06.2017 Сообщений: 15

	Ввести 10 чисел и посчитать сумму положительных. 18.06.2018, 15:45. Показов 4179. Ответов 1 Метки нет (Все метки) Ввести 10 чисел и посчитать сумму положительных (цикл со счетчиком) 0

Лучшие ответы (1)

Сообщение: #12486062

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

18.06.2018, 15:45

Ответы с готовыми решениями:

Посчитать сумму положительных чисел для каждой строки и количество положительных во всем двухмерном массиве
Дан двухмерный массив M*N элементов. Посчитать сумму положительных чисел для каждой строки и количество положительных во всем двухмерном...

Программа просит вас ввести пять чисел a1, b1, c1, d1, e1 и найти сумму положительных чисел из введенных чисел
Программа просит вас ввести пять чисел a1, b1, c1, d1, e1 и найти сумму положительных чисел из введенных чисел.

Puporev

Почетный модератор

64314 / 47610 / 32743

Регистрация: 18.05.2008

Сообщений: 115,167

18.06.2018, 16:36

Сообщение было отмечено Garek1 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
s:=0;
for i:=1 to 10 do
 begin
  write('n=');
  readln(n);
  if n>0 then s:=s+n;
 end;
write('Сумма положительных=',s);

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

18.06.2018, 16:36

Помогаю со студенческими работами здесь

Нужно ввести 5 действительных чисел, и посчитать их сумму, арифмитическое значение.....???
Ввести 5 действительных чисел. Посчитать их сумму, среднее арифметическое значение, стандартное отклонение, среднеквадратичное отклонение. ...

Ввести два числа и посчитать сумму чисел между ними
Задание: ввести предел чисел через цикл for. Чтобы в конце код подсчитал сколько чисел со знаком +, а сколько с минусом, и прибавил их.

Нужно ввести 5 действительных чисел, и посчитать их сумму, арифмитическое значение........
Ввести 5 действительных чисел. Посчитать их сумму, среднее арифметическое значение, стандартное отклонение, среднеквадратичное отклонение. ...

Посчитать сумму положительных и отрицательных чисел матрицы
Здравствуйте !!! Этот код считает сумму положительных и отрицательных чисел матрицы. Подскажите, почему у меня в сообщении ShowMessage...

Ввести 6 значений и посчитать сумму чисел, больших 4 и меньших или равных 7
Помогите пожалуйста с задачей: Написать программу, которая введет 6 значений и посчитает сумму чисел, больших 4 и меньших или равных 7.

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

Наверх