Форум программистов, компьютерный форум, киберфорум
C# для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/30: Рейтинг темы: голосов - 30, средняя оценка - 4.80
0 / 0 / 0
Регистрация: 27.10.2010
Сообщений: 23

Дана непустая последовательность положительных целых чисел, за которой следует 0 (это признак конца последовательности). Вычислить среднее геометри

24.11.2010, 09:41. Показов 5896. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
//Дана непустая последовательность положительных целых чисел, за которой следует 0
//(это признак конца последовательности). Вычислить среднее геометрическое этих чисел.
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
 
namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            double x;
            double sg = 1;
            int count = 0;
            for (; ; )
            {
                x = double.Parse(Console.ReadLine());
                if (x == 0)
                    break;
                else
                {
                    count++;
                    sg *= x;
                }
            }
 
            sg = Math.Pow(sg, count);
            Console.Write(" среднее геометрическое = " + sg.ToString());
            Console.Write("\nДля выхода из программы нажмите [Enter]:");
            string ankey = Console.ReadLine();
                
        }
    }
}
Здравствуйте, собственно в чем проблема, мне надо переписать программу - чтобы она решалась через операторы: for, while, do. Помогите пожалуйста.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
24.11.2010, 09:41
Ответы с готовыми решениями:

Дана непустая последовательность ненулевых целых чисел, за которой следует 0 (0 - признак конца последовательности)
Дана непустая последовательность ненулевых целых чисел, за которой следует 0 (0 - признак конца последовательности). Определить три...

Дана непустая последовательность ненулевых целых чисел, за которой следует 0(0 - признак конца последовательности)
Дана непустая последовательность ненулевых целых чисел, за которой следует 0(0 - признак конца последовательности) Определить, сколько из...

Дана не пустая последовательность не нулевых чисел, за которой следует 0 (0-признак конца последовательности.)
Определить, сколько из них принимает наименьшее значение.(ребята помогите написать программу)

5
11 / 11 / 8
Регистрация: 22.10.2009
Сообщений: 55
24.11.2010, 10:55
можно конечно сделать все проще, но для того чтобы использовать все три управляющих структуры в этой задаче:

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
            double sg = 1;
            List<double> list = new List<double>(); //для того, чтобы потом была возможность использовать цикл for
            do
            {
                 list.Add(double.Parse(Console.ReadLine()));
            } while (list.Last() != 0);
            list.Remove(0); //удаляем 0 - последний элемнет
            for (int i = 0; i < list.Count; i++)
            {
                sg *= list[i];
            }
 
            sg = Math.Pow(sg, list.Count);
            Console.Write(" среднее геометрическое = " + sg);
            Console.Write("\nДля выхода из программы нажмите [Enter]:");
            Console.ReadLine();
1
0 / 0 / 0
Регистрация: 27.10.2010
Сообщений: 23
24.11.2010, 11:10  [ТС]
Большое спасибо
0
11 / 11 / 8
Регистрация: 22.10.2009
Сообщений: 55
24.11.2010, 11:44
не туда запостил
0
0 / 0 / 0
Регистрация: 27.10.2010
Сообщений: 23
24.11.2010, 15:11  [ТС]
huh 0.о
0
 Аватар для Filislav
339 / 285 / 62
Регистрация: 02.09.2010
Сообщений: 547
24.11.2010, 20:55
а по моему среднее геометрическое это корень степени (n) из произведения (n) чисел...А в ваших реализациях получается произведение (n) чисел в степени (n), а должно быть в (-n) степени тогда.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
24.11.2010, 20:55
Помогаю со студенческими работами здесь

Дана непустая последовательность не нулевых целых чисел, за которой следует 0
Дана непустая последовательность не нулевых целых чисел, за которой следует 0. Определить три наименьших числа среди них. Добавлено...

Дана непустая последовательность ненулевых целых чисел, за которой следует 0
Дана непустая последовательность ненулевых целых чисел, за которой следует 0. Найти произведение сумм чисел, равноудаленных от центра...

Определить три наибольших числа в последовательности не нулевых целых чисел
Дана непустая последовательность не нулевых целых чисел, за которой следует 0: Определить три наибольших числа среди них

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

Дана непустая последовательность целых ненулевых чисел, за которой следует 0. Определить, сколько в ней чисел, кратных 3
Дана непустая последовательность целых ненулевых чисел, за которой следует 0. Определить, сколько в ней чисел, кратных 3 и 5, подсчитать их...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru