3 / 3 / 0
Регистрация: 13.04.2017
Сообщений: 31

Нарисовать блок-схему (Сумма всех цифр)

16.04.2017, 23:20. Показов 1016. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите нарисовать блок-схему. Буду очень благодарен. Вот код:
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
    class Program
    {
        static void Main(string[] args)
        {
            Console.Write("Введите первое 4-ёх значное число: ");
            string a = Console.ReadLine();яя
            try
            {
                int x = Convert.ToInt32(a);
            }
            catch
            {
                Console.WriteLine("Ошибка! Введено нодопустимый символ!");
                
                Console.ReadKey();
                return;
            }
            Console.Write("Введите второе 4-ёх значное число: ");
            string b = Console.ReadLine();
            try
            {
                int y = Convert.ToInt32(b);
            }
            catch
            {
                Console.WriteLine("Ошибка! Введено нодопустимый символ!");
                Console.ReadKey();
                return;
            }
            try
            { }
            finally  
            {
                string ab = a + b;
                int il = ab.Length;
                int summ = 0;
                for (int i = 0; i < il; i++)
                {
                    char s = ab[i];
                    string sch = Convert.ToString(s);
                    int ch = Convert.ToInt32(sch);
                    summ = summ+ch;
                }
                Console.ForegroundColor = ConsoleColor.Yellow;
                    Console.WriteLine("Сумма всех цифр - {0}", summ);
                Console.ReadKey();
            }
        }
    }
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
16.04.2017, 23:20
Ответы с готовыми решениями:

Сумма всех натуральных чисел от 1 до 1000, сумма цифр которых равна 10
Я сначала хотел написать рекурсивную функцию, которая сводила бы расчёт от 3-охзначных чисел к 2-узначным и 1-нозначным, но запутался...

Нарисовать блок-схему
Найти среднее арифм. наименьших по абсолютной величине элементов каждой строки матрицы FM(m,m), находящихся над главной диагональю

Нарисовать БЛОК-СХЕМУ
uses crt; var n:integer; s:real; begin clrscr; n:=0; s:=0; while n&lt;128 do begin n:=n+2;

1
 Аватар для ViterAlex
8953 / 4865 / 1886
Регистрация: 11.02.2013
Сообщений: 10,246
17.04.2017, 01:52
Программа у тебя неправильная. Почему вычисление суммы цифр выведено в блок finally второго try?
Вот так будет вернее:
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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
static void Main(string[] args)
{
    int a = 0, b = 0;
    if (!GetIntegerValue("Введите первое четырёхзначное число", ref a))
    {
        return;
    }
    if (!GetIntegerValue("Введите второе четырёхзначное число", ref b))
    {
        return;
    }
    Console.WriteLine("Сумма цифр {0} = {1}", a + b, SumOfDigits(a + b));
    Console.Read();
}
 
static int SumOfDigits(int number)
{
    if (number < 10)
    {
        return number;
    }
    return number % 10 + SumOfDigits(number / 10);
}
 
static bool GetIntegerValue(string prompt, ref int value)
{
    while (true)
    {
        Console.Write("{0}: ", prompt);
        var input = Console.ReadLine();
        if (input.Length == 4)
        {
            if (int.TryParse(input, out value))
            {
                break;
            }
            Console.ForegroundColor = ConsoleColor.Red;
            Console.WriteLine("{0} не является целым числом.", input);
        }
        else
        {
            Console.ForegroundColor = ConsoleColor.Red;
            Console.WriteLine("{0} не является четырёхзначным числом.", input);
        }
        Console.ResetColor();
        Console.WriteLine("Нажмите любую кнопку для продолжения или Escape для выхода.");
        var key = Console.ReadKey(false);
        if (key.Key == ConsoleKey.Escape)
        {
            return false;
        }
    }
    return true;
}
Миниатюры
Нарисовать блок-схему (Сумма всех цифр)  
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
17.04.2017, 01:52
Помогаю со студенческими работами здесь

Нарисовать блок-схему
Помогите нарисовать блок-схему! Вот код Program lab4; uses crt; type mas=array of integer; var a:mas; s,sl,n,m,i,j:integer; ...

Нарисовать блок-схему
uses crt; const n=8; var a,b:array of integer; i,sum,k:integer; sr:real; begin ClrScr; for i:=1 to n do ...

Нарисовать блок-схему
uses graphABC; function F1(x:real):real; begin F1:=x*cos(2*x); end; function F2(x:real):real; begin F2:=sqrt(x*x+2); end; ...

Нарисовать блок схему
Помогите, пожалуйста, нарисовать блок схему. type tstud = record fam: string; group: 1..7; geom: word; ...

Нарисовать блок-схему
Нужно нарисовать блок-схему по данной задаче


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

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

Новые блоги и статьи
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru