Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
panchenko383895
0 / 0 / 0
Регистрация: 28.02.2016
Сообщений: 6
#1

Вывести среднее арифметическое положительных чисел с 2 десятичными знаками - Pascal ABC

28.02.2016, 16:39. Просмотров 173. Ответов 3
Метки нет (Все метки)

Вывести среднее арифметическое положительных чисел с 2 десятичными знаками. В случае отсутствия положительных чисел вывести сообщение " Not Found " (без кавычек)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.02.2016, 16:39
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вывести среднее арифметическое положительных чисел с 2 десятичными знаками (Pascal ABC):

Найти среднее арифметическое: положительных чисел / неотрицательных чисел / чисел, кратных 5 - Pascal ABC
В целочисленном массиве 20 элементов из диапазона (-1000;1000).Найти среднее арифметическое положительных чисел,среднее арифметическое...

Вычислить среднее арифметическое отрицательных чисел и количество положительных чисел - Pascal ABC
1.)Вычислить среднее арифметическое отрицательных чисел и количество положительных чисел при вводе нуля закончить работу.

Найти среднее арифметическое положительных чисел среди данных целых чисел, количество которых N - Pascal ABC
Используя оператор цикла For, найти среднее арифметическое положительных чисел среди данных целых чисел, количество которых N.

Вычислите среднее арифметическое положительных чисел последовательности - Pascal ABC
помогите пожалуйста с программой Пусть дано n вещественных чисел, которые вводятся по одному. Вычислите среднее арифметическое...

Вычислить среднее арифметическое последовательности положительных чисел - Pascal ABC
записать алгоритм решения задачи в виде блок-схемы, но вы напишите в паскале я сам его в блок схемы переведу. Заранее благодарен 30....

Найти среднее арифметическое положительных четных чисел - Pascal ABC
Дан файл целых чисел.Найти среднее арифметическое положительных четных чисел. var F: file of integer; f1:file of integer; sr,k:...

3
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3835 / 2822 / 1941
Регистрация: 05.06.2014
Сообщений: 13,818
28.02.2016, 21:05 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
readln(a,b);
if (a<=0) and (b<=0) then
 writeln('Not found')
else
 writeln(a/b:0:2);
0
panchenko383895
0 / 0 / 0
Регистрация: 28.02.2016
Сообщений: 6
02.03.2016, 01:01  [ТС] #3
Забыл указать. Для масива чисел
0
Puporev
Модератор
54031 / 41664 / 14741
Регистрация: 18.05.2008
Сообщений: 97,961
02.03.2016, 09:56 #4
Создай массив, посчитай сумму и количество положительных.
Если k=0 положительных нет, иначе sr:=sum/k;
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.03.2016, 09:56
Привет! Вот еще темы с ответами:

Вычислить среднее арифметическое отрицательных чисел и количество положительных - Pascal ABC
С клавиатуры вводятся n произвольных чисел. Вычислить среднее арифметическое отрицательных чисел и количество положительных

Вычислить сумму и среднее арифметическое последовательности положительных чисел - Pascal ABC
Написать программу, вычисляющую сумму и среднее арифметическое последовательности положительных чисел. Числа вводятся с клавиатуры.

Вычислить среднее арифметическое 10 положительных чисел введеных с клавиатуры - Pascal ABC
1)вычислить среднее арифметическое 10 положительных чисел введеных с клавиатуры. 2) ввести с клавиатуры 20 целых чисел посчитать сумму...

Найти среднее арифметическое положительных и среднее арифметическое отрицательных элементов массива. - Pascal ABC
Дан массив вещественных чисел А(А1,А2,…,Аn). Найти среднее арифметическое положительных и среднее арифметическое отрицательных элементов...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru