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

QBasic

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

Дано целое число и набор из N чисел - значений некоторой величины. Найти среднее значение этой величины - QBasic

14.05.2012, 19:24. Просмотров 946. Ответов 1
Метки нет (Все метки)

Minmax21. Дано целое число N (>2) и набор из N чисел - значений некоторой величины, полученных в N опытах. Найти среднее значение этой величины. При вычислении среднего значения не учитывать минимальное и максимальное из имеющихся в наборе значений.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.05.2012, 19:24
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Дано целое число и набор из N чисел - значений некоторой величины. Найти среднее значение этой величины (QBasic):

Дано целое число N (N>1). Найти наименьшее целое число К - QBasic
Дано целое число N (N>1). Найти наименьшее целое число К, при котором выполняется неравенство 3 в степени К > N.

Дано целое число, являющееся некоторой степенью числа 2. Найти целое число K — показатель этой степени - Matlab
Добрый день форумчанине. Помогите пожалуйста перевести, программу из Pascal на MatLab Дано целое число N (> 0), являющееся некоторой...

Одномерные массивы. Заменить элементы массива, меньшие заданной величины на значение этой величины - Delphi
Составьте программу, заменяющую все элементы одномерного массива (массив заполняется с клавиатуры), меньшие заданной величины (вводится...

Найти сумму значений элементов массива, больших некоторой величины М - Pascal ABC
Дан массив А из 10 элементов. Найти сумму значений элементов массива, больших некоторой величины М. Помогите пожалуйста:)

Дано целое число N и набор из N целых чисел, Вывести сумму чисел из данного набор, расположенных между последними двумя нулями - Pascal
Здравствуйте! Помогите решить задачу. Pascal. Дано целое число N и набор из N целых чисел, содержащий по крайней мере два нуля. ...

Дано целое числочисло Х. Вычислить значение величины Y. Нарисовать блок-схему задачи. - Turbo Pascal
ЗАДАЧА Дано целое числочисло Х. Вычислить значение величины Y. Нарисовать блок-схему задачи. ЗАДАЧА Написать программу вычисленияу в...

1
Quiet Snow
4379 / 1260 / 209
Регистрация: 25.04.2010
Сообщений: 3,071
15.05.2012, 15:39 #2
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
0 CLS
  INPUT "Vvedi N: ", n
IF n < 3 GOTO 0
FOR i = 1 TO n
   PRINT "  Vvedi znachenie N" + CHR$(248); i;
   INPUT ": ", z
    IF i = 1 THEN mx = z: mn = z
    IF z > mx THEN mx = z
    IF z < mn THEN mn = z
   s = s + z
NEXT
   sr = (s - mx - mn) / (n - 2)
   PRINT "Sr. arifm ="; sr
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.05.2012, 15:39
Привет! Вот еще темы с ответами:

Minmax>Дано целое число N(>1) и набор из N чисел. Найти максимальную сумму двух соседних чисел из данного набора. - Pascal ABC
Дано целое число N(&gt;1) и набор из N чисел. Найти максимальную сумму двух соседних чисел из данного набора.

Дано целое число N (> 2) и набор из N чисел. Найти два наименьших элемента из данного набора - Visual Basic
Дано целое число N (&gt; 2) и набор из N чисел. Найти два наименьших елемента из данного набора и вывести эти элементы в порядке ...

Дан одномерный массив А(15). Найти сумму и произведение значений элементов массива, больших некоторой величины - Pascal ABC
Дан одномерный массив А(15). Найти сумму и произведение значений элементов массива, больших некоторой величины t. Заранее спасибо

Дано целое число N и набор из N целых чисел. Найти номер первого максимального нечетного числа из данного набора ... - C#
Здравствуйте помогите, пожалуйста решить задачи в си шарп: 1. Описать функцию RadToDeg(R) вещественного типа, находящую величину угла...


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

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

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