Напишите в комментариях к этой записи консольные приложения для решения этих задач, укажите также код задачи. Пример решения.
Решены задачи: 1. Не решены: 2-34.
Задачи
W3.1. Дано натуральное число.
а) Верно ли, что сумма его цифр больше 10?
б) Верно ли, что произведение его цифр меньше 50?
в) Верно ли, что количество его цифр есть четное число?
г) Верно ли, что это число четырехзначное? Составное условие и вложенный условный оператор не использовать.
д) Верно ли, что его первая цифра не превышает 6?
е) Верно ли, что оно начинается и заканчивается одной и той же цифрой?
ж) Определить, какая из его цифр больше: первая или последняя.
W3.2. Дано натуральное число.
а) Верно ли, что сумма его цифр меньше a?
б) Верно ли, что произведение его цифр больше b?
в) Верно ли, что это число k-значное? Составное условие и вложенный условный оператор не использовать.
г) Верно ли, что его первая цифра превышает m?
W3.3. Дано натуральное число.
а) Верно ли, что сумма его цифр больше k, а само число четное?
б) Верно ли, что количество его цифр есть четное число, а само число не превышает b?
в) Верно ли, что оно начинается цифрой x и заканчивается цифрой y?
г) Верно ли, что произведение его цифр меньше a, а само число делится на b?
д) Верно ли, что сумма его цифр больше m, а само число делится на n?
W3.4. Дано натуральное число. Определить:
а) есть ли в нем цифра 3;
б) есть ли в нем цифры 2 и 5.
W3.5. Дано натуральное число.
а) Определить, есть ли в нем цифра a.
б) Верно ли, что в нем нет цифры b?
в) Верно ли, что цифра a встречается в нем более k раз?
г) Определить, есть ли в нем цифры a и b.
W3.6. Дано натуральное число. Выяснить, является ли оно палиндромом («перевертышем»), т. е. числом, десятичная запись которого читается одинаково слева направо и справа налево.
W3.7. Дано натуральное число. Выяснить, является ли оно простым (простым называется натуральное число, большее 1, не имеющее других делителей, кроме единицы и самого себя). Оператор цикла с параметром не использовать.
W3.8. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их справа налево упорядоченной по возрастанию. Например, для числа 5321 ответ положительный, для чисел 7820 и 9663 — отрицательный и т.п.
W3.9. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их справа налево упорядоченной по неубыванию. Например, для чисел 5321 и 9663 ответ положительный, для числа 7820 — отрицательный и т.п.
W3.10. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их слева направо упорядоченной по возрастанию. Например, для числа 1478 ответ положительный, для чисел 1782 и 1668 — отрицательный и т.п.
W3.11. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их слева направо упорядоченной по неубыванию. Например, для чисел 1368 и 1669 ответ положительный, для числа 1782 — отрицательный и т.п.
W3.12. Дана последовательность вещественных чисел a1, a2, …, a15, упорядоченная по возрастанию, и число n, не равное ни одному из чисел последовательности и такое, что a1 < n < a15. Найти элемент последовательности (его порядковый номер и значение), ближайший к n.
W3.13. Дана последовательность вещественных чисел a1, a2, …, a15. Определить, есть ли в последовательности отрицательные числа. В случае положительного ответа определить порядковый номер первого из них.
W3.14. Дана непустая последовательность целых чисел, оканчивающаяся числом 100. Определить, есть ли в последовательности число 77? Если имеются несколько таких чисел, то определить порядковый номер первого из них.
W3.15. Дана последовательность натуральных чисел a1, a2, …, a20,. Определить, есть ли в последовательности хотя бы одно число, оканчивающееся цифрой 7? В случае положительного ответа определить порядковый номер первого из них.
W3.16. Дана непустая последовательность целых чисел, оканчивающаяся числом –1. Определить, есть ли в последовательности хотя бы одно число, кратное семи? В случае положительного ответа определить порядковый номер первого из них.
W3.17. Дана непустая и упорядоченная по возрастанию последовательность целых чисел, оканчивающаяся числом 10 000. Определить порядковый номер первого числа, большего заданного n. Если таких чисел в последовательности нет, то должно быть выведено соответствующее сообщение.
W3.18. Известны оценки по информатике 28 учеников класса. Выяснить, есть ли среди оценок двойки?
W3.19. Известны данные о мощности двигателя 30 моделей легковых автомобилей. Выяснить, есть ли среди них модель, мощность двигателя которой превышает 200 л. с.
W3.20. Дана последовательность натуральных чисел a1, a2, …, a15. Определить, есть ли в последовательности хотя бы одна пара одинаковых «соседних» чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар.
W3.21. Дана последовательность целых чисел, оканчивающаяся числом –1. Количество чисел в последовательности не меньше двух. Определить, есть ли в ней хотя бы одна пара одинаковых «соседних» чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар.
W3.22. Дана последовательность натуральных чисел a1, a2, …, a20,. Определить, есть ли в последовательности хотя бы одна пара «соседних» нечетных чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар.
W3.23. Дана последовательность целых чисел, оканчивающаяся числом 9999. Количество чисел в последовательности не меньше двух. Определить, есть ли в ней хотя бы одна пара «соседних» четных чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар.
W3.24. Дана последовательность вещественных чисел a1, a2, …, a15. Определить, является ли последовательность упорядоченной по возрастанию. В случае отрицательного ответа определить порядковый номер первого числа, нарушающего такую упорядоченность.
W3.25. Дана последовательность вещественных чисел, оканчивающаяся числом 10 000. Количество чисел в последовательности не меньше двух. Определить, является ли последовательность упорядоченной по возрастанию. В случае отрицательного ответа определить порядковый номер первого числа, нарушающего такую упорядоченность.
W3.26. Имеется список учащихся класса с указанием роста каждого из них. Выяснить, перечислены ли ученики в списке в порядке убывания их роста.
W3.27. Имеются данные о сумме очков, набранных в чемпионате каждой из футбольных команд. Выяснить, перечислены ли команды в списке в соответствии с занятыми ими местами в чемпионате.
W3.28. Дана последовательность целых a1, a2, …, a15. Верно ли, что все элементы последовательности равны между собой?
W3.29. Дана непустая последовательность целых чисел, оканчивающаяся отрицательным числом. Верно ли, что все элементы последовательности равны между собой?
W3.30. Дана последовательность из 20 чисел из интервала от 0 до 66, представляющих собой условные обозначения костей домино (например, число 42 есть обозначение кости домино «4–2» или «2–4», число 33 — кости «3–3» и т. п.). Определить, соответствует ли последовательность чисел ряду костей домино, выложенному по правилам этой игры. Рассмотреть два случая:
а) последняя цифра каждого числа соответствует количеству точек на правой половине кости домино;
б) количеству точек на правой и левой половинах кости домино может соответствовать любая из цифр заданных чисел.
Примечание. В обоих случаях оператор цикла с параметром не использовать.
W3.31. Определить:
а) является ли заданное число степенью числа 3;
б) является ли заданное число степенью числа 5.
W3.32. Дано натуральное число. Определить, является ли оно членом последовательности Фибоначчи (первый и второй члены последовательности равны 1, каждый следующий равен сумме двух предыдущих).
W3.33. Выяснить, является ли заданное число n членом арифметической прогрессии, первый член которой равен f, а шаг — s.
W3.34. Выяснить, является ли заданное число m членом геометрической прогрессии, первый член которой равен g, а знаменатель — z .
NEW: Наш Чат, в котором вы можете обсудить любые вопросы, идеи, поделиться опытом или связаться с администраторами.
|
|
|
|
//W3.26 Console.WriteLine("W3.26. Имеется список учащихся класса с указанием роста каждого из них. Выяснить, перечислены ли ученики в списке в порядке убывания их роста."); int N26total = (int)Input("количество учеников в классе"); int N26; int N26temp = Int32.MaxValue; int N26count = 1; bool B26 = true; while (N26count<=N26total) { N26 = (int)Input($"рост {N26count}-го ученика"); if (N26 > N26temp) B26 = false; N26temp = N26; N26count++; } Console.WriteLine(B26?"Ученики перечислены в порядке убывания роста":"Ученики перечислены НЕ в порядке убывания роста"); Console.ReadKey(); Console.Clear(); //W3.27 Console.WriteLine("W3.27. Имеются данные о сумме очков, набранных в чемпионате каждой из футбольных команд. Выяснить, перечислены ли команды в списке в соответствии с занятыми ими местами в чемпионате."); int N27total = (int)Input("количество учасстников чемпионата"); int N27; int N27count=1; int N27temp = Int32.MaxValue; bool B27 = true; while (N27count<=N27total) { N27 = (int)Input($"количество очков {N27count}-й команды"); if (N27temp < N27) B27 = false; N27temp = N27; N27count++; } Console.WriteLine(B27?"Команды перечислены в соответствии с занятым местом": "Команды перечислены НЕ в соответствии с занятым местом"); Console.ReadKey(); Console.Clear(); //W3.28 Console.WriteLine("W3.28. Дана последовательность целых a1, a2, …, a15. Верно ли, что все элементы последовательности равны между собой?"); int N28; int N28count = 1; int N28temp=Int32.MaxValue; bool B28 = true; while (N28count <= 15) { N28 = (int)Input($"{N28count}-е число последовательности"); if (N28temp != Int32.MaxValue && N28 != N28temp) B28 = false; N28temp = N28; N28count++; } Console.WriteLine(B28?"Все элементы последовательности равны между собой":"Не все элементы последовательности равны между собой"); Console.ReadKey(); Console.Clear(); //W3.29 Console.WriteLine("W3.29. Дана непустая последовательность целых чисел, оканчивающаяся отрицательным числом. Верно ли, что все элементы последовательности равны между собой?"); int N29=Int32.MaxValue; int N29temp = Int32.MaxValue; bool B29 = true; while (N29>=0) { N29 = (int)Input("следующее значение последовательности"); if (N29temp != Int32.MaxValue && N29temp != N29 && N29>=0) B29 = false; N29temp = N29; } Console.WriteLine(B29?"Все элементы последовательности равны между собой": "Не все элементы последовательности равны между собой"); Console.ReadKey(); Console.Clear(); //W3.30 Console.WriteLine("W3.30. Дана последовательность из 20 чисел из интервала от 0 до 66, представляющих собой условные обозначения костей домино (например, число 42 есть обозначение кости домино «4–2» или «2–4», число 33 — кости «3–3» и т. п.). Определить, соответствует ли последовательность чисел ряду костей домино, выложенному по правилам этой игры. Рассмотреть два случая:\nа) последняя цифра каждого числа соответствует количеству точек на правой половине кости домино;\nб) количеству точек на правой и левой половинах кости домино может соответствовать любая из цифр заданных чисел.\nПримечание.В обоих случаях оператор цикла с параметром не использовать."); //Random R30 = new Random(); int[] N30M = new int[20]; for (int a=0, b=0; a<N30M.Length; a++, b=0) { //N30M[a] = (R30.Next(0, 7) * 10 + R30.Next(0, 7)); //Console.Write($"{N30M[a]:d2} "); while (b != 1) { N30M[a] = (int)Input($"{a + 1}-й член последовательности",0,66); if (N30M[a] / 10 < 7 && N30M[a] % 10 < 7) b = 1; else Console.WriteLine("Введено неверное значение"); } } int N30count = 1; int N30temp1 = -1; int N30temp2 = -1; bool B30v1 = true; while (N30count<=N30M.Length) { N30temp1 = N30M[N30count - 1] / 10; if (N30count != 1 && N30temp1 != N30temp2) B30v1 = false; N30temp2 = N30M[N30count - 1] % 10; N30count++; } bool B30v2 = true; int N30last=N30M[0]%10; N30count = 1; while (N30count<=N30M.Length) { N30temp1 = N30M[N30count - 1] / 10; N30temp2 = N30M[N30count - 1] % 10; if (N30count == 1) { N30count++; continue; } if (N30temp2 == N30last) N30last = N30temp1; else { if (N30temp1 == N30last) N30last = N30temp2; else B30v2 = false; } N30count++; } Console.WriteLine(B30v1?"\nВ первом случае полседовательность выстроена правильно":"\nВ первом случае последовательность выстроена НЕ правильно"); Console.WriteLine(B30v2 ? "Во втором случае полседовательность выстроена правильно" : "Во втором случае последовательность выстроена НЕ правильно"); Console.ReadKey(); Console.Clear(); //W3.31 Console.WriteLine("W3.31. Определить: \nа) является ли заданное число степенью числа 3;\nб) является ли заданное число степенью числа 5."); int N31A = (int)Input("число"); int N31B = N31A; bool B31A = true; bool B31B = true; while (N31A>1) { if (N31A % 3 != 0) B31A = false; N31A /= 3; } while (N31B>1) { if (N31B % 5 != 0) B31B = false; N31B /= 5; } Console.WriteLine(B31A? "Заданное число является степенью числа 3" : "Заданное число НЕ является степенью числа 3"); Console.WriteLine(B31B ? "Заданное число является степенью числа 5" : "Заданное число НЕ является степенью числа 5"); Console.ReadKey(); Console.Clear(); //W3.32 Console.WriteLine("W3.32. Дано натуральное число. Определить, является ли оно членом последовательности Фибоначчи (первый и второй члены последовательности равны 1, каждый следующий равен сумме двух предыдущих)."); int N32 = (int)Input("натуральное число"); int N32Fib1 = 1; int N32Fib2 = 1; int N32temp; bool B32 = false; while (N32Fib1 <= N32) { N32temp = N32Fib1; N32Fib1 += N32Fib2; N32Fib2 = N32temp; if (N32Fib1 == N32) B32 = true; } Console.WriteLine(B32? "Число является членом последовательности Фибоначчи" : "Число НЕ является членом последовательности Фибоначчи"); Console.ReadKey(); Console.Clear(); //W3.33 Console.WriteLine("W3.33. Выяснить, является ли заданное число n членом арифметической прогрессии, первый член которой равен f, а шаг — s."); int N33 = (int)Input("число N"); int N33F = (int)Input("первый член последовательности F"); int N33S = (int)Input("шаг S"); bool B33 = false; while (N33F<=N33) { if (N33F == N33) B33 = true; N33F += N33S; } Console.WriteLine(B33?"Число является частью последовательности":"Число НЕ является частью последовательности"); Console.ReadKey(); Console.Clear(); //W3.34 Console.WriteLine("W3.34. Выяснить, является ли заданное число m членом геометрической прогрессии, первый член которой равен g, а знаменатель — z ."); int N34 = (int) Input("число M"); int N34G = (int)Input("первый член последовательности G"); int N34Z = (int)Input("знаменатель последовательности Z"); bool B34 = false; while (N34>=N34G) { if (N34 == N34G) B34 = true; N34G *= N34Z; } Console.WriteLine(B34? "Число является частью последовательности" : "Число НЕ является частью последовательности"); Console.ReadKey(); Console.Clear(); } } }using System; //W3. Использование условного оператора после операторов цикла с условием namespace W3 { class Program { static double Input(string Name, double Min = -1.7E308, double Max = 1.7E308, double Exception1 = 1.7E308) { double Num; Console.WriteLine($"Введите {Name}:") ; while (!(double.TryParse(Console.ReadLine(), out Num) && Num >= Min && Num <= Max && Num != Exception1)) Console.WriteLine($"Введено неверное значение, введите {Name}:"); return Num; } static void Main() { //W3.1 Console.WriteLine("W3.1. Дано натуральное число.\nа) Верно ли, что сумма его цифр больше 10 ?\nб) Верно ли, что произведение его цифр меньше 50 ?\nв) Верно ли, что количество его цифр есть четное число?\nг) Верно ли, что это число четырехзначное? Составное условие и вложенный условный оператор не использовать.\nд) Верно ли, что его первая цифра не превышает 6 ?\nе) Верно ли, что оно начинается и заканчивается одной и той же цифрой?\nж) Определить, какая из его цифр больше: первая или последняя."); long N1 = (long)Input("натуральное число", 0); int N1sum = 0; int N1prod = 1; int N1count = 0; int N1first=-1; int N1last=-1; int N1temp; while (N1 > 0) { N1temp = (int)(N1 % 10); N1sum += N1temp; N1prod *= N1temp; N1count++; if (N1count == 1) N1last = N1temp; if (N1 > 0 && N1 < 10) N1first = N1temp; N1 /= 10; } Console.WriteLine(N1sum>10? "Сумма его цифр больше 10" : "Сумма его цифр не больше 10"); Console.WriteLine(N1prod < 50 ? "Произведение его цифр меньше 50" : "Произведение его цифр не меньше 50"); Console.WriteLine(N1count % 2 == 0 ? "Количество его цифр четное число": "Количество его цифр нечетное число") ; Console.WriteLine(N1count == 4 ?"Это число четырехзначное":$"Это число состоит из {N1count} знаков"); Console.WriteLine(N1first <= 6 ?"Первая цифра не превышает 6": "Первая цифра превышает 6"); Console.WriteLine(N1first==N1last?"Число начинается и заканчивается одной и той же цифрой": "Число начинается и заканчивается разными цифрами"); if (N1first!=N1last) Console.WriteLine(N1first > N1last ? "Первая цифра больше последней":"Последняя цифра больше первой"); Console.ReadKey(); Console.Clear(); //W3.2 Console.WriteLine("W3.2. Дано натуральное число.\nа) Верно ли, что сумма его цифр меньше a?\nб) Верно ли, что произведение его цифр больше b?\nв) Верно ли, что это число k - значное ? Составное условие и вложенный условный оператор не использовать.\nг) Верно ли, что его первая цифра превышает m ? "); ulong N2 = (ulong)Input("натуральное число",0); int N2sum = 0; int N2prod = 1; int N2count = 0; int N2first = -1; int N2temp; while (N2 > 0) { N2temp = (int)(N2 % 10); N2sum += N2temp; N2prod *= N2temp; N2count++; if (N2 < 10 && N2 > 0) N2first = N2temp; N2 /= 10; } int N2A = (int)Input("число А"); Console.WriteLine(N2sum < N2A ? $"Сумма его цифр меньше чем {N2A}" : $"Сумма его цифр не меньше чем {N2A}") ; int N2B = (int)Input("число B"); Console.WriteLine(N2prod > N2B ? $"Произведение его цифр больше чем {N2B}" : $"Произведение его цифр не больше чем {N2B}"); int N2K = (int)Input("число K"); Console.WriteLine(N2count == N2K ? $"Это число {N2K} - значное" : $"Это число не {N2K} значное"); int N2M = (int)Input("число M"); Console.WriteLine(N2first > N2M ? $"Первая цифра превышает {N2M}" : $"Первая цифра не превышает {N2M}"); Console.ReadKey(); Console.Clear(); //W3.3 Console.WriteLine("W3.3. Дано натуральное число.\nа) Верно ли, что сумма его цифр больше k, а само число четное?\nб) Верно ли, что количество его цифр есть четное число, а само число не превышает b?\nв) Верно ли, что оно начинается цифрой x и заканчивается цифрой y?\nг) Верно ли, что произведение его цифр меньше a, а само число делится на b?\nд) Верно ли, что сумма его цифр больше m, а само число делится на n?"); ulong N3 = (ulong)Input("натурвльное число",0); ulong N3double = N3; int N3sum = 0; int N3count = 0; int N3first = -1; int N3last = -1; int N3prod = 1; int N3temp; while (N3double > 0) { N3temp =(int) (N3double % 10); N3count++; N3sum += N3temp; N3prod *= N3temp; if (N3count == 1) N3last = N3temp; if (N3double > 0 && N3double < 10) N3first = N3temp; N3double /= 10; } int N3K = (int)Input("число K"); Console.WriteLine((N3sum>N3K && N3%2==0)?$"Сумма чисел больше {N3K} и само число четное": $"Не верно, что сумма чисел больше {N3K} и само число четное"); ulong N3B = (ulong)Input("число B"); Console.WriteLine((N3 <= N3B && N3count % 2 == 0) ? $"Количество его цифр есть четное число, а само число не превышает {N3B}" : $"Не верно, что количество его цифр есть четное число, а само число не превышает {N3B}"); int N3X = (int)Input("число X",0,9); int N3Y = (int)Input("число Y",0,9); Console.WriteLine((N3first == N3X && N3last == N3Y) ? $"Верно, что оно начинается цифрой {N3X} и заканчивается цифрой {N3Y}" : $"Не верно, что оно начинается цифрой {N3X} и заканчивается цифрой {N3Y}"); int N3A2 = (int)Input("число A"); ulong N3B2 = (ulong)Input("число B"); Console.WriteLine((N3prod < N3A2 && N3 % N3B2 == 0) ? $"Произведение его цифр меньше {N3A2}, а само число делится на {N3B2}" : $"Не верно, что произведение его цифр меньше {N3A2}, а само число делится на {N3B2}"); int N3M = (int)Input("число M"); ulong N3N = (ulong)Input("число N"); Console.WriteLine((N3sum > N3M && N3 % N3N == 0) ? $"Cумма его цифр больше {N3M}, а само число делится на {N3N}" : $"Не верно, что cумма его цифр больше {N3M}, а само число делится на {N3N}"); Console.ReadKey(); Console.Clear(); //W3.4 Console.WriteLine("W3.4. Дано натуральное число. Определить: \nа) есть ли в нем цифра 3;\nб) есть ли в нем цифры 2 и 5."); ulong N4 = (ulong)Input("натуральное число",0); bool B4N3 = false; bool B4N2 = false; bool B4N5 = false; int N4temp; while (N4>0) { N4temp = (int)(N4 % 10); if (N4temp == 3) B4N3 = true; if (N4temp == 2) B4N2 = true; if (N4temp == 5) B4N5 = true; N4 /= 10; } Console.WriteLine(B4N3 ? "Число содержит цифру 3" : "Число не содержит цифру 3"); Console.WriteLine((B4N2&&B4N5) ? "Число содержит цифры 2 и 5" : "Число не содержит цифры 2 и 5"); Console.ReadKey(); Console.Clear(); //W3.5 Console.WriteLine("W3.5. Дано натуральное число.\nа) Определить, есть ли в нем цифра a.\nб) Верно ли, что в нем нет цифры b?\nв) Верно ли, что цифра a встречается в нем более k раз?\nг) Определить, есть ли в нем цифры a и b."); int N5 = (int) Input("натуральное число", 0); int N5temp; int[] N5M = new int[10]; for (int a = 0; a < N5M.Length; a++) N5M[a] = 0; while (N5>0) { N5temp = (N5 % 10); N5M[N5temp]++; N5 /= 10; } //for (int b = 0; b < N5M.Length; b++) Console.WriteLine($"{b} - {N5M[b]}"); int N5A = (int)Input("цифра А",0,9); Console.WriteLine(N5M[N5A]>0?$"В числе есть цифра {N5A}":$"В числе нет цифры {N5A}"); int N5B = (int)Input("цифра B", 0, 9); Console.WriteLine(N5M[N5B] == 0 ? $"В числе нет цифры {N5B}" : $"В числе есть цифра {N5B}"); int N5A2 = (int)Input("цифра А", 0, 9); int N5K2 = (int)Input("число K"); Console.WriteLine(N5M[N5A2] > N5K2 ? $"Цифра {N5A2} встречается в числе более {N5K2} раз" : $"Цифра {N5A2} встречается в числе не более {N5K2} раз"); int N5A3 = (int)Input("цифра А", 0, 9); int N5B3 = (int)Input("цифра B",0,9); Console.WriteLine((N5M[N5A3] > 0 && N5M[N5B3] > 0) ? $"В числе есть цифры {N5A3} и {N5B3}" : $"В числе нет цифр {N5A3} и {N5B3}"); Console.ReadKey(); Console.Clear(); //W3.6 Console.WriteLine("W3.6. Дано натуральное число. Выяснить, является ли оно палиндромом («перевертышем»), т. е. числом, десятичная запись которого читается одинаково слева направо и справа налево."); ulong N6 = (ulong)Input("натуральное число"); bool B6 = true; int N6count = 0; int N6first; int N6last; while (N6count < (Convert.ToString(N6).Length)/2) { N6count++; N6first = (int)((N6 % (ulong)Math.Pow(10, Convert.ToString(N6).Length - N6count+1)) / (ulong)(Math.Pow(10, (Convert.ToString(N6).Length - N6count)))); N6last = (int)((N6 % (ulong)Math.Pow(10, N6count)) / (ulong)Math.Pow(10, N6count - 1)); if (N6first != N6last) B6 = false; } Console.WriteLine(B6?$"{N6} число полиндром":$"{N6} не число полиндром"); Console.ReadKey(); Console.Clear(); //W3.7 Console.WriteLine("W3.7. Дано натуральное число. Выяснить, является ли оно простым (простым называется натуральное число, большее 1, не имеющее других делителей, кроме единицы и самого себя). Оператор цикла с параметром не использовать."); int N7 = (int)Input("натуральное число",0); bool B7 = true; int N7count=2; while (N7count<Math.Sqrt(N7)) { if (N7 % N7count == 0) B7 = false; N7count++; } Console.WriteLine(B7&&N7>1 ? $"{N7} простое число" : $"{N7} не простое число"); Console.ReadKey(); Console.Clear(); //W3.8 Console.WriteLine("W3.8. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их справа налево упорядоченной по возрастанию. Например, для числа 5321 ответ положительный, для чисел 7820 и 9663 — отрицательный и т.п."); int N8 = (int)Input("натуральное число"); bool B8 = true; int N8temp1=-1; int N8temp2=-1; while (N8>0) { N8temp2 = N8temp1; N8temp1 = N8 % 10; N8 /= 10; if (N8temp2 >= N8temp1) B8 = false; } Console.WriteLine(B8?"Последовательяность увеличивается справа на лево":"Последовательяность не увеличивается справа на лево"); Console.ReadKey(); Console.Clear(); //W3.9 Console.WriteLine("W3.9. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их справа налево упорядоченной по неубыванию. Например, для чисел 5321 и 9663 ответ положительный, для числа 7820 — отрицательный и т.п."); int N9 = (int)Input("натуральное число"); bool B9 = true; int N9temp1=-1; int N9temp2=-1; while (N9>0) { N9temp2 = N9temp1; N9temp1 = N9 % 10; if (N9temp1 < N9temp2) B9 = false; N9 /= 10; } Console.WriteLine(B9?$"Число справа налево упорядочено по неубыванию" :$"Число справа налево не упорядочено по неубыванию"); Console.ReadKey(); Console.Clear(); //W3.10 Console.WriteLine("W3.10. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их слева направо упорядоченной по возрастанию. Например, для числа 1478 ответ положительный, для чисел 1782 и 1668 — отрицательный и т.п."); int N10 = (int)Input("Натуральное число"); bool B10 = true; int N10temp1 = 10; int N10temp2 = 10; while (N10>0) { N10temp2 = N10temp1; N10temp1 = N10 % 10; if (N10temp1 >= N10temp2) B10 = false; N10 /= 10; } Console.WriteLine(B10? "Число слева направо упорядоченное по возрастанию" : "Число слева направо не упорядоченное по возрастанию"); Console.ReadKey(); Console.Clear(); //W3.11 Console.WriteLine("W3.11. Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их слева направо упорядоченной по неубыванию. Например, для чисел 1368 и 1669 ответ положительный, для числа 1782 — отрицательный и т.п."); int N11 = (int)Input("натуральное число"); bool B11 = true; int N11temp1=10; int N11temp2=10; while (N11>0) { N11temp2 = N11temp1; N11temp1 = N11 % 10; if (N11temp2 < N11temp1) B11 = false; N11 /= 10; } Console.WriteLine(B11? "Последовательность цифр при просмотре их слева направо является упорядоченной по неубыванию" : "Последовательность цифр при просмотре их слева направо НЕ является упорядоченной по неубыванию"); Console.ReadKey(); Console.Clear(); //W3.12 Console.WriteLine("W3.12. Дана последовательность вещественных чисел a1, a2, …, a15, упорядоченная по возрастанию, и число n, не равное ни одному из чисел последовательности и такое, что a1 < n < a15. Найти элемент последовательности (его порядковый номер и значение), ближайший к n."); int [] N12= new int [15]; int N12count = 0; while (N12count < 15) { N12[N12count] = (int)Input($"{N12count + 1} - е из 15 вещественных чисел", N12count>0?N12[N12count-1]+1:-1.7E308); N12count++; } int N12N; bool B12; do { B12 = false; N12N = (int)Input("число N, должно быть в пределах последовательности и неравно ни одному из его членов", N12[0] + 1, N12[N12.Length-1] - 1); for (int a = 0; a < N12.Length; a++) { if (N12[a] == N12N) B12 = true; } } while (B12) ; int N12near = 0; while (N12N>N12[N12near]) N12near++; if (N12[N12near] - N12N > N12N - N12[N12near-1]) N12near -= 1; Console.Write($"\nБлижайшее число к {N12N} в последовательности "); for (int b = 0; b < N12.Length; b++) Console.Write($"{N12[b]} "); Console.Write($"находится на {N12near+1} месте и это {N12[N12near]}"); Console.ReadKey(); Console.Clear(); //W3.13 Console.WriteLine("W3.13. Дана последовательность вещественных чисел a1, a2, …, a15. Определить, есть ли в последовательности отрицательные числа. В случае положительного ответа определить порядковый номер первого из них."); int N13; int N13count = 0; int N13Min1 = 0; bool B13 = true; while (N13count < 15) { N13 = (int)Input($"число А{N13count + 1}"); if (N13 < 0 && B13) { N13Min1 = N13; B13 = false; } N13count++; } Console.WriteLine(N13Min1 < 0 ? $"Первое отрицательное число в последовательности {N13Min1}" : "В последовательности нет отрицательных чисел") ; Console.ReadKey(); Console.Clear(); //W3.14 Console.WriteLine("W3.14. Дана непустая последовательность целых чисел, оканчивающаяся числом 100. Определить, есть ли в последовательности число 77? Если имеются несколько таких чисел, то определить порядковый номер первого из них."); int N14=0; int N14N77=0; bool B77=true; while(N14 !=100) { N14 = (int)Input("следующее число последовательности"); if (B77) N14N77++; if (B77 && N14 == 77) B77 = false; } Console.WriteLine(!B77?$"Первое число 77 в последовательности находится на {N14N77} месте":"В последовательности нет чисел 77"); Console.ReadKey(); Console.Clear(); //W3.15 Console.WriteLine("W3.15. Дана последовательность натуральных чисел a1, a2, …, a20,. Определить, есть ли в последовательности хотя бы одно число, оканчивающееся цифрой 7? В случае положительного ответа определить порядковый номер первого из них."); int N15; int N15count = 0; int N15N7=0; bool B15 = false; while(N15count<20) { N15 = (int)Input($"{N15count+1} - й член последовательности"); if (!B15 && N15 % 10 == 7) { N15N7 = N15count; B15 = true; } N15count++; } Console.WriteLine(B15 ? $"Первое число оканчивающееся на 7 расположено на {N15N7+1} позиции" : "В последовательности нет чисел заканчивающихся на 7") ; Console.ReadKey(); Console.Clear(); //W3.16 Console.WriteLine("W3.16. Дана непустая последовательность целых чисел, оканчивающаяся числом –1. Определить, есть ли в последовательности хотя бы одно число, кратное семи? В случае положительного ответа определить порядковый номер первого из них."); int N16=0; int N16count=0; bool B16 = false; while (N16!=-1) { N16 = (int)Input("новый член последовательности"); if (!B16) N16count++; if (!B16 && N16 % 7 == 0) B16 = true; } Console.WriteLine(B16 ? $"Первое кратное 7 число расположено на {N16count} позиции" : "В последовательности нет чисел кратных 7"); Console.ReadKey(); Console.Clear(); //W3.17 Console.WriteLine("W3.17. Дана непустая и упорядоченная по возрастанию последовательность целых чисел, оканчивающаяся числом 10 000. Определить порядковый номер первого числа, большего заданного n. Если таких чисел в последовательности нет, то должно быть выведено соответствующее сообщение."); int N17 = 0; int N17count = 0; int N17N = (int) Input("число N"); bool B17 = false; while (N17!=10000) { N17 = (int)Input("следующий член последовательности", N17 + 1); if (!B17) N17count++; if (!B17 && N17 > N17N) B17 = true; } Console.WriteLine(B17?$"Первое число в последовательности больше N расположено на {N17count} месте":"В последовательности нет чисел больше N"); Console.ReadKey(); Console.Clear(); //W3.18 Console.WriteLine("W3.18. Известны оценки по информатике 28 учеников класса. Выяснить, есть ли среди оценок двойки?"); int[] N18M = new int[28]; Random R18 = new Random(); for (int a = 0; a < N18M.Length; a++) N18M[a] = R18.Next(2, 6); bool B18 = false; int N18count = 0; Console.Write("\nОценки: "); while (N18count<N18M.Length) { Console.Write(N18M[N18count] + " "); if (N18M[N18count] < 3) B18 = true; N18count++; } Console.WriteLine(B18?"В классе есть двойки":"В классе двоек нет") ; Console.ReadKey(); Console.Clear(); //W3.19 Console.WriteLine("W3.19. Известны данные о мощности двигателя 30 моделей легковых автомобилей. Выяснить, есть ли среди них модель, мощность двигателя которой превышает 200 л. с."); Random R19 = new Random(); int[] N19M = new int[30]; bool B19 = false; for (int a = 0; a < N19M.Length; a++) { N19M[a] = R19.Next(50, 211); if (N19M[a] > 200) B19 = true; Console.Write(N19M[a] + " "); } Console.WriteLine(B19?"\nСреди автомобилей есть такие, чья мощность превышает 200 л.с.": "\nСреди автомобилей нет таких, чья мощность превышает 200 л.с."); Console.ReadKey(); Console.Clear(); //W3.20 Console.WriteLine("W3.20. Дана последовательность натуральных чисел a1, a2, …, a15. Определить, есть ли в последовательности хотя бы одна пара одинаковых «соседних» чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар."); int N20; int N20count = 1; int N20last = Int32.MinValue; int N20SimPlace = 0; bool B20 = false; while (N20count<=15) { N20 = (int)Input($"{N20count}-е число последовательности"); if (!B20 && N20 == N20last) { N20SimPlace = N20count; B20 = true; } N20last = N20; N20count++; } Console.WriteLine(B20?$"Первая пара одинаковых чисел расположена на {N20SimPlace-1} и {N20SimPlace} местах":"В последовательности нет соседних одинаковых чисел"); Console.ReadKey(); Console.Clear(); //W3.21 Console.WriteLine("W3.21. Дана последовательность целых чисел, оканчивающаяся числом –1. Количество чисел в последовательности не меньше двух. Определить, есть ли в ней хотя бы одна пара одинаковых «соседних» чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар."); int N21=0; int N21count=1; int N21SimPlace = 0; int N21temp = -1; while (N21!=-1) { N21 = (int)Input($"{N21count}-e число последовательности"); if (N21 == -1 && N21count == 1) { Console.WriteLine("В последовательности должно быть хотя бы 2 члена"); N21 = 0; continue; } if (N21SimPlace == 0 && N21 == N21temp) N21SimPlace = N21count; N21count++; N21temp = N21; } Console.WriteLine(N21SimPlace!=0?$"Первая пара одинаковых чисел расположена на {N21SimPlace - 1} и {N21SimPlace} местах" : "В последовательности нет соседних одинаковых чисел"); Console.ReadKey(); Console.Clear(); //W3.22 Console.WriteLine("W3.22. Дана последовательность натуральных чисел a1, a2, …, a20,. Определить, есть ли в последовательности хотя бы одна пара «соседних» нечетных чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар."); int N22; int N22count = 1; int N22SimPlace = 0; int N22temp = Int32.MinValue; while (N22count<=20) { N22 = (int)Input($"{N22count}-е число последовательности"); if (N22SimPlace == 0 && N22 == N22temp && N22 % 2 == 1) N22SimPlace = N22count; N22temp = N22; N22count++; } Console.WriteLine(N22SimPlace!=0?$"Первая пара одинаковых нечетных чисел расположена на {N22SimPlace - 1} и {N22SimPlace} местах" : "В последовательности нет соседних одинаковых нечетных чисел"); Console.ReadKey(); Console.Clear(); //W3.23 Console.WriteLine("W3.23. Дана последовательность целых чисел, оканчивающаяся числом 9999. Количество чисел в последовательности не меньше двух. Определить, есть ли в ней хотя бы одна пара «соседних» четных чисел. В случае положительного ответа определить порядковые номера чисел первой из таких пар."); int N23=0; int N23count=1; int N23SimPlace = 0; int N23temp = 9999; while(N23!=9999) { N23 = (int)Input($"{N23count}-е число последовательности"); if (N23 == 9999 && N23count == 1) { Console.WriteLine("В последовательности должно быть хотя бы 2 члена"); N23 = 0; continue; } if (N23SimPlace==0 && N23 == N23temp && N23%2==0) N23SimPlace = N23count; N23temp = N23; N23count++; } Console.WriteLine(N23SimPlace!=0?$"Первая пара одинаковых четных чисел расположена на {N23SimPlace - 1} и {N23SimPlace} местах" : "В последовательности нет соседних одинаковых четных чисел"); Console.ReadKey(); Console.Clear(); //W3.24 Console.WriteLine("W3.24. Дана последовательность вещественных чисел a1, a2, …, a15. Определить, является ли последовательность упорядоченной по возрастанию. В случае отрицательного ответа определить порядковый номер первого числа, нарушающего такую упорядоченность."); int N24; int N24count=+1; int N24BadPlace = 0; int N24temp = Int32.MinValue; while (N24count<=15) { N24 = (int)Input($"{N24count}-е число последовательности"); if (N24BadPlace == 0 && N24temp >= N24) N24BadPlace = N24count; N24temp = N24; N24count++; } Console.WriteLine(N24BadPlace!=0?$"Первый член нарушавший возрастание последовательности находится на {N24BadPlace} месте":"Последовательность является возрастающей"); Console.ReadKey(); Console.Clear(); //W3.25 Console.WriteLine("W3.25. Дана последовательность вещественных чисел, оканчивающаяся числом 10 000. Количество чисел в последовательности не меньше двух. Определить, является ли последовательность упорядоченной по возрастанию. В случае отрицательного ответа определить порядковый номер первого числа, нарушающего такую упорядоченность."); int N25=0; int N25count = 1; int N25BadPlace = 0; int N25temp=Int32.MinValue; while (N25!=10000) { N25 = (int)Input($"{N25count}-е число последовательности"); if (N25 == 10000 && N25count == 1) { Console.WriteLine("В последовательности должно быть хотя бы 2 числа"); N25 = 0; continue; } if (N25 <= N25temp) N25BadPlace = N25count; N25temp = N25; N25count++; } Console.WriteLine(N25BadPlace != 0 ? $"Первый член нарушавший возрастание последовательности находится на {N25BadPlace} месте" : "Последовательность является возрастающей"); Console.ReadKey(); Console.Clear(); //W3.26 Console.WriteLine("W3.26. Имеется список учащихся класса с указанием роста каждого из них. Выяснить, перечислены ли ученики в сп№3.6
Console.WriteLine(«Введите натуральное число: «);
int num = Convert.ToInt32(Console.ReadLine());
int num1 = num;
int x = 0;
while (num > 0)
{
x *= 10;
x = x + num % 10;
num /= 10;
}
if (x==num1)
Console.WriteLine(«Число палиндром»);
else
Console.WriteLine(«Число не является палиндромом»);
Задача W3.1 ж)
Console.WriteLine(«Введите натуральное число: «);
int num = Convert.ToInt32(Console.ReadLine());
int i = 0;
int x = num%10;
do
{
num /= 10;
{ i++; }
if (num <= 9)
break;
}
while (num>0);
if (i > 1)
{
if (num > x)
Console.WriteLine(«Первая цифра больше»);
else if (num == x)
Console.WriteLine(«Первая цифра и последняя равны»);
else
Console.WriteLine($»Последняя цифра больше»);
Console.ReadLine();
}
else
Console.WriteLine(«Число однозначное»);
W3.34. Выяснить, является ли заданное число m членом геометрической прогрессии, первый член которой равен g, а знаменатель — z .
static void Main(string[] args) { double g, z; double number; Console.Write("Enter number "); number = Convert.ToDouble(Console.ReadLine()); Console.Write("Enter first term of a geometric progression "); g = Convert.ToDouble(Console.ReadLine()); Console.Write("Enter denominator "); z = Convert.ToDouble(Console.ReadLine()); double term = 0; double n = 1; while(term<number) { term = g * Math.Pow(z, n - 1); n++; Console.WriteLine(term); } if(term==number) { Console.WriteLine("The number is the term of this geomeyric progression"); } else { Console.WriteLine("The number is not the term of this geometric progression"); } }Алексей В, правильно, но:
— можно значительно упростить алгоритм (сделать все в одном цикле, убрать ненужные переменные терм и н)
— можно назвать имена переменных более понятно
Называть имена переменных более понятно в данном задании некорректно, ибо в условии они называются g и z.
Алексей В, а number, term и n?
W3.34. Такой вариант решения.
Console.WriteLine(«Введите число m: «);
int m = Convert.ToInt32(Console.ReadLine());
Console.WriteLine(«Введите первый член g: «);
int g = Convert.ToInt32(Console.ReadLine());
Console.WriteLine(«Введите знаменатель z: «);
int z = Convert.ToInt32(Console.ReadLine());
int i = 0;
while (i<m)
{
i = g * z;
g = g * z;
Console.WriteLine(g);
}
if (i == m)
Console.WriteLine(«Заданное число является членом геометрической прогрессии»);
else
Console.WriteLine(«Заданное число НЕ является членом геометрической прогрессии»);
Задача W3.1
Console.Write(«Введите число: «);
string number = Console.ReadLine();
char[] numberArray = number.ToCharArray();
int[] numbers = new int[numberArray.Length];
int sumArray = 0;
int proizvedenieArray = 1;
int help = numbers.Length — 1;
for (int i = 0; i < numbers.Length; i++)
{
numbers[i] = Convert.ToInt32(numberArray[i].ToString());
}
for (int i = 0; i 10)
{
Console.WriteLine(«Сумма его цифр больше 10»);
}
else
{
Console.WriteLine(«Сумма его цифр не больше 10»);
}
for (int i = 0; i < numbers.Length; i++)
{
int helpproivedenie = proizvedenieArray;
proizvedenieArray = helpproivedenie * Convert.ToInt32(numbers[i]);
}
if (proizvedenieArray < 50)
{
Console.WriteLine("Произведение его цифр меньше 50");
}
else
{
Console.WriteLine("Произведение его цифр больше 50");
}
if (numbers.Length % 2 == 0)
{
Console.WriteLine("Количество цифр числа четное");
}
else
{
Console.WriteLine("Количество цифр числа нечетное");
}
if (numbers.Length == 4)
{
Console.WriteLine("Число четырехзначное");
}
else
{
Console.WriteLine("Число не четырехзначное");
}
if (numbers[0] numbers[help])
{
Console.WriteLine(«Первая цифра числа больше второго»);
}
else
{
Console.WriteLine(«Вторая цифра числа больше первого»);
}
Задача W3.4
public static void W3WithFor(int a)
{
string atostring = a.ToString();
int forcheck2 = 0, forcheck5 = 0;
for (int i = 0; i = 1 && forcheck5 >= 1)
{
Console.WriteLine($»В числе {a} есть цифры 2 и 5″);
}
}
Задача W.3.1. Дано натуральное число.
а) Верно ли, что сумма его цифр больше 10?
Пример решения.
static void Main(string[] args) { int n, s = 0; Console.Write("Введите натуральное число: "); n = Convert.ToInt32(Console.ReadLine()); while (n != 0) { s = s + n % 10; n = n / 10; } if (s > 10) Console.WriteLine("Сумма цифр больше 10"); else Console.WriteLine("Сумма цифр НЕ больше 10"); Console.ReadKey(); }