Размер шрифта:
М. Э. Абрамян. Programming Taskbook. Электронный задачник по программированию Версия 4.5
Play

М. Э. Абрамян. Programming Taskbook. Электронный задачник по программированию Версия 4.5

3 Общее описание 3 Общее описание Электронный задачник Programming Taskbook предназначен для обучения программированию на языках Pascal, Visual Basic, C++, C#. Он содержит 1000 учебных заданий, охватывающих все основные разделы базового курса программирования: от скалярных типов и управляющих операторов до сложных структур данных и рекурсивных алгоритмов. Версия 4.5 задачника Programming Taskbook реализована для следующих сред: Borland Pascal 7.0, Borland Delphi , Microsoft Visual Basic , Borland C++Builder , Microsoft Visual C++ 6.0, Microsoft Visual Studio.NET 2003 (языки Visual C++ 7.0, Visual Basic.NET и Visual C#.NET). Кроме того, задачник включен в учебную систему программирования Pascal ABC (автор С. С. Михалкович), образуя единый программный комплекс Pascal ABC & Programming Taskbook. Задачник содержит следующие группы учебных заданий (в скобках указано количество заданий для каждой группы): Begin ввод и вывод данных, оператор присваивания (40), Integer целые числа (30), Boolean логические выражения (40), If условный оператор (30), Case оператор выбора (20), For цикл с параметром (40), While цикл с условием (30), Series последовательности (40), Proc процедуры и функции (60), Minmax минимумы и максимумы (30), Array одномерные массивы (140), Matrix двумерные массивы (матрицы) (100), String символы и строки (70), File двоичные файлы (90), Text текстовые файлы (60), Param составные типы данных в процедурах и функциях (70), Recur рекурсия (30), Dynamic динамические структуры данных (80). Задачник Programming Taskbook предоставляет учащимся следующие возможности:

4 4 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 отображение на экране текста задания и связанных с ним данных; демонстрация правильных результатов для каждого задания; предоставление исходных данных программе учащегося; дополнительный контроль за операциями ввода-вывода; проверка правильности результатов, полученных программой; запись в особый файл результатов информации о каждом тестовом испытании программы; регистрация задания как выполненного после надлежащего количества успешных тестовых испытаний программы, проведенных подряд. Использование электронного задачника существенно ускоряет процесс выполнения заданий, так как избавляет учащегося от дополнительных усилий по организации ввода-вывода, что особенно удобно при обработке массивов, строк, файлов и динамических структур. Предоставляя учащемуся готовые исходные данные, задачник акцентирует его внимание на разработке и программной реализации алгоритма решения заданий, причем разнообразие исходных данных обеспечивает надежное тестирование предложенного алгоритма. PDF-версия задачника Programming Taskbook содержит формулировки всех учебных заданий. Формулировки отформатированы в соответствии с печатным вариантом задачника, который приведен в книгах «Практикум по программированию на языке Паскаль» (автор М. Э. Абрамян) и «Основы программирования на языке Паскаль» (авторы М. Э. Абрамян и С. С. Михалкович). Задания, помеченные символом, можно выполнять в свободно распространяемой бесплатной мини-версии задачника. В мини-версию включены 200 заданий, в том числе все задания групп Begin, Integer, Boolean, а также избранные задания из других разделов задачника. Следует отметить, что в миниверсию включены все задания, решения которых даются в книгах «Практикум по программированию на языке Паскаль» и «Основы программирования на языке Паскаль». Ниже приводится список всех заданий, включенных в миниверсию задачника: Begin1 Begin40, Integer1 Integer30, Boolean1 Boolean40, If4, If6, If8, If12, If22, If26, Case4, Case9, For5, For12 For13, For15 For16, For19 For20, For33, For36, While1 While2, While4, While7, While11 While12, While22 While23, Series1, Series15 Series17, Series19, Series21, Series30, Proc4, Proc8, Proc21, Proc25, Proc40, Minmax1, Minmax6, Minmax12, Minmax26, Array7, Array47, Array60, Array68, Array112, Array116, Matrix7, Matrix24, Matrix53, Matrix82, Matrix88, String9 String10, String29, String41, String70, File2, File25,

5 Замечания о формулировках заданий 5 File43, File48, File67, File74, Text1, Text4, Text21, Text34, Text42, Text57, Param1, Param17, Param41, Param51, Recur1, Recur10, Recur14 Recur18, Recur25, Dynamic2 Dynamic3, Dynamic5, Dynamic8, Dynamic10 Dynamic11, Dynamic30, Dynamic49, Dynamic55. Для того чтобы упростить работу с заданиями, доступными в миниверсии, все эти задания (кроме заданий групп Begin, Integer и Boolean) объединены в особую группу Mix (см. раздел «Избранные задания из различных групп»). Замечания о формулировках заданий При формулировке заданий не используются понятия и имена, специфические для конкретного языка программирования, за исключением обозначения нулевого указателя NIL, которое используется в заданиях группы Dynamic («Динамические структуры данных»). Отметим, что группа Dynamic не включена в набор заданий для языков Visual Basic и С#. Если о типе исходных или результирующих числовых данных в задании ничего не сказано, то предполагаются вещественные данные. Исключение составляет группа заданий Dynamic, в которой все числовые данные считаются целыми, и в формулировках заданий это особо не оговаривается. При обработке наборов вещественных чисел следует предполагать, что все элементы набора являются различными (таким образом, любой набор вещественных чисел содержит единственный минимальный и единственный максимальный элемент). В наборах целых чисел могут присутствовать одинаковые элементы; в частности, наборы целых чисел могут содержать несколько минимальных и максимальных элементов. Аналогичные предположения справедливы для числовых массивов, а также для файлов, содержащих числовые данные. Если в задании не указан максимальный размер исходных массивов, то его можно считать равным 10 для одномерных и для двумерных массивов. При описании элементов одномерных и двумерных массивов используется понятие порядкового номера элемента, причем начальный элемент массива A размера N всегда имеет порядковый номер 1 и обозначается в формулировках заданий как A 1, а конечный элемент этого же массива имеет порядковый номер N и обозначается как A N. Аналогично, начальный элемент двумерно-

6 6 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 го массива B обозначается как B 1,1. Кроме того, понятие порядкового номера применяется к строкам и столбцам двумерных массивов (матриц): начальная строка и начальный столбец матрицы размера M N имеют порядковый номер 1, конечная строка номер M, а конечный столбец номер N. Подобный подход не зависит от выбора языка программирования и соответствует традиционно используемой в математике нумерации элементов векторов и матриц. Максимальный размер исходных файлов не указывается, поэтому при решении заданий на файлы не следует использовать вспомогательные массивы, содержащие все элементы исходных файлов, однако допускается использование вспомогательных файлов. Все исходные файлы считаются существующими, за исключением специально оговоренных случаев, в которых существование исходных файлов требуется проверять в ходе выполнения задания. Ввод и вывод данных, оператор присваивания Все входные и выходные данные в заданиях этой группы являются вещественными числами. Begin1. Дана сторона квадрата a. Найти его периметр P = 4 a. Begin2. Дана сторона квадрата a. Найти его площадь S = a 2. Begin3. Даны стороны прямоугольника a и b. Найти его площадь S = a b и периметр P = 2 (a + b). Begin4. Дан диаметр окружности d. Найти ее длину L = π d. В качестве значения π использовать Begin5. Дана длина ребра куба a. Найти объем куба V = a 3 и площадь его поверхности S = 6 a 2. Begin6. Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a b c и площадь поверхности S = 2 (a b + b c + a c). Begin7. Найти длину окружности L и площадь круга S заданного радиуса R: L = 2 π R, S = π R 2. В качестве значения π использовать Begin8. Даны два числа a и b. Найти их среднее арифметическое: (a + b)/2. Begin9. Даны два неотрицательных числа a и b. Найти их среднее геометрическое, то есть квадратный корень из их произведения: a b. Begin10. Даны два ненулевых числа. Найти сумму, разность, произведение и частное их квадратов.

7 Ввод и вывод данных, оператор присваивания 7 Begin11. Даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей. Begin12. Даны катеты прямоугольного треугольника a и b. Найти его гипотенузу c и периметр P: c = a 2 + b 2, P = a + b + c. Begin13. Даны два круга с общим центром и радиусами R 1 и R 2 (R 1 > R 2 ). Найти площади этих кругов S 1 и S 2, а также площадь S 3 кольца, внешний радиус которого равен R 1, а внутренний радиус равен R 2 : S 1 = π (R 1 ) 2, S 2 = π (R 2 ) 2, S 3 = S 1 S 2. В качестве значения π использовать Begin14. Дана длина L окружности. Найти ее радиус R и площадь S круга, ограниченного этой окружностью, учитывая, что L = 2 π R, S = π R 2. В качестве значения π использовать Begin15. Дана площадь S круга. Найти его диаметр D и длину L окружности, ограничивающей этот круг, учитывая, что L = 2 π R, S = π R 2. В качестве значения π использовать Begin16. Найти расстояние между двумя точками с заданными координатами x 1 и x 2 на числовой оси: x 2 x 1. Begin17. Даны три точки A, B, C на числовой оси. Найти длины отрезков AC и BC и их сумму. Begin18. Даны три точки A, B, C на числовой оси. Точка C расположена между точками A и B. Найти произведение длин отрезков AC и BC. Begin19. Даны координаты двух противоположных вершин прямоугольника: (x 1, y 1 ), (x 2, y 2 ). Стороны прямоугольника параллельны осям координат. Найти периметр и площадь данного прямоугольника. Begin20. Найти расстояние между двумя точками с заданными координатами (x 1, y 1 ) и (x 2, y 2 ) на плоскости. Расстояние вычисляется по формуле (x2 x 1 ) 2 + (y 2 y 1 ) 2. Begin21. Даны координаты трех вершин треугольника: (x 1, y 1 ), (x 2, y 2 ), (x 3, y 3 ). Найти его периметр и площадь, используя формулу для расстояния между двумя точками на плоскости (см. задание Begin20). Для нахождения площади треугольника со сторонами a, b, c использовать формулу Герона: S = p (p a) (p b) (p c), где p = (a + b + c)/2 полупериметр. Begin22. Поменять местами содержимое переменных A и B и вывести новые значения A и B.

8 8 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 Begin23. Даны переменные A, B, C. Изменить их значения, переместив содержимое A в B, B в C, C в A, и вывести новые значения переменных A, B, C. Begin24. Даны переменные A, B, C. Изменить их значения, переместив содержимое A в C, C в B, B в A, и вывести новые значения переменных A, B, C. Begin25. Найти значение функции y = 3x 6 6x 2 7 при данном значении x. Begin26. Найти значение функции y = 4(x 3) 6 7(x 3) при данном значении x. Begin27. Дано число A. Вычислить A 8, используя вспомогательную переменную и три операции умножения. Для этого последовательно находить A 2, A 4, A 8. Вывести все найденные степени числа A. Begin28. Дано число A. Вычислить A 15, используя две вспомогательные переменные и пять операций умножения. Для этого последовательно находить A 2, A 3, A 5, A 10, A 15. Вывести все найденные степени числа A. Begin29. Дано значение угла α в градусах (0 < α < 360). Определить значение этого же угла в радианах, учитывая, что 180 = π радианов. В качестве значения π использовать Begin30. Дано значение угла α в радианах (0 < α < 2 π). Определить значение этого же угла в градусах, учитывая, что 180 = π радианов. В качестве значения π использовать Begin31. Дано значение температуры T в градусах Фаренгейта. Определить значение этой же температуры в градусах Цельсия. Температура по Цельсию T C и температура по Фаренгейту T F связаны следующим соотношением: T C = (T F 32) 5/9. Begin32. Дано значение температуры T в градусах Цельсия. Определить значение этой же температуры в градусах Фаренгейта. Температура по Цельсию T C и температура по Фаренгейту T F связаны следующим соотношением: T C = (T F 32) 5/9. Begin33. Известно, что X кг конфет стоит A рублей. Определить, сколько стоит 1 кг и Y кг этих же конфет. Begin34. Известно, что X кг шоколадных конфет стоит A рублей, а Y кг ирисок стоит B рублей. Определить, сколько стоит 1 кг шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.

9 Ввод и вывод данных, оператор присваивания 9 Begin35. Скорость лодки в стоячей воде V км/ч, скорость течения реки U км/ч (U < V). Время движения лодки по озеру T 1 ч, а по реке (против течения) T 2 ч. Определить путь S, пройденный лодкой (путь = время скорость). Учесть, что при движении против течения скорость лодки уменьшается на величину скорости течения. Begin36. Скорость первого автомобиля V 1 км/ч, второго V 2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили удаляются друг от друга. Данное расстояние равно сумме начального расстояния и общего пути, проделанного автомобилями; общий путь = время суммарная скорость. Begin37. Скорость первого автомобиля V 1 км/ч, второго V 2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу. Данное расстояние равно модулю разности начального расстояния и общего пути, проделанного автомобилями; общий путь = время суммарная скорость. Begin38. Решить линейное уравнение A x + B = 0, заданное своими коэффициентами A и B (коэффициент A не равен 0). Begin39. Найти корни квадратного уравнения A x 2 + B x + C = 0, заданного своими коэффициентами A, B, C (коэффициент A не равен 0), если известно, что дискриминант уравнения положителен. Вывести вначале меньший, а затем больший из найденных корней. Корни квадратного уравнения находятся по формуле x 1, 2 = ( B ± D)/(2 A), где D дискриминант, равный B 2 4 A C. Begin40. Найти решение системы линейных уравнений вида A 1 x + B 1 y = C 1, A 2 x + B 2 y = C 2, заданной своими коэффициентами A 1, B 1, C 1, A 2, B 2, C 2, если известно, что данная система имеет единственное решение. Воспользоваться формулами x = (C 1 B 2 C 2 B 1 )/D, y = (A 1 C 2 A 2 C 1 )/D, где D = A 1 B 2 A 2 B 1.

10 10 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 Целые числа Все входные и выходные данные в заданиях этой группы являются целыми числами. Все числа, для которых указано количество цифр (двузначное число, трехзначное число и т. д.), считаются положительными. Integer1. Дано расстояние L в сантиметрах. Используя операцию деления нацело, найти количество полных метров в нем (1 метр = 100 см). Integer2. Дана масса M в килограммах. Используя операцию деления нацело, найти количество полных тонн в ней (1 тонна = 1000 кг). Integer3. Дан размер файла в байтах. Используя операцию деления нацело, найти количество полных килобайтов, которые занимает данный файл (1 килобайт = 1024 байта). Integer4. Даны целые положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Используя операцию деления нацело, найти количество отрезков B, размещенных на отрезке A. Integer5. Даны целые положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Используя операцию взятия остатка от деления нацело, найти длину незанятой части отрезка A. Integer6. Дано двузначное число. Вывести вначале его левую цифру (десятки), а затем его правую цифру (единицы). Для нахождения десятков использовать операцию деления нацело, для нахождения единиц операцию взятия остатка от деления. Integer7. Дано двузначное число. Найти сумму и произведение его цифр. Integer8. Дано двузначное число. Вывести число, полученное при перестановке цифр исходного числа. Integer9. Дано трехзначное число. Используя одну операцию деления нацело, вывести первую цифру данного числа (сотни). Integer10. Дано трехзначное число. Вывести вначале его последнюю цифру (единицы), а затем его среднюю цифру (десятки). Integer11. Дано трехзначное число. Найти сумму и произведение его цифр. Integer12. Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево. Integer13. Дано трехзначное число. В нем зачеркнули первую слева цифру и приписали ее справа. Вывести полученное число.

11 Целые числа 11 Integer14. Дано трехзначное число. В нем зачеркнули первую справа цифру и приписали ее слева. Вывести полученное число. Integer15. Дано трехзначное число. Вывести число, полученное при перестановке цифр сотен и десятков исходного числа (например, 123 перейдет в 213). Integer16. Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц исходного числа (например, 123 перейдет в 132). Integer17. Дано целое число, большее 999. Используя одну операцию деления нацело и одну операцию взятия остатка от деления, найти цифру, соответствующую разряду сотен в записи этого числа. Integer18. Дано целое число, большее 999. Используя одну операцию деления нацело и одну операцию взятия остатка от деления, найти цифру, соответствующую разряду тысяч в записи этого числа. Integer19. С начала суток прошло N секунд (N целое). Найти количество полных минут, прошедших с начала суток. Integer20. С начала суток прошло N секунд (N целое). Найти количество полных часов, прошедших с начала суток. Integer21. С начала суток прошло N секунд (N целое). Найти количество секунд, прошедших с начала последней минуты. Integer22. С начала суток прошло N секунд (N целое). Найти количество секунд, прошедших с начала последнего часа. Integer23. С начала суток прошло N секунд (N целое). Найти количество полных минут, прошедших с начала последнего часа. Integer24. Дни недели пронумерованы следующим образом: 0 воскресенье, 1 понедельник, 2 вторник. 6 суббота. Дано целое число K, лежащее в диапазоне Определить номер дня недели для K-го дня года, если известно, что в этом году 1 января было понедельником. Integer25. Дни недели пронумерованы следующим образом: 0 воскресенье, 1 понедельник, 2 вторник. 6 суббота. Дано целое число K, лежащее в диапазоне Определить номер дня недели для K-го дня года, если известно, что в этом году 1 января было четвергом. Integer26. Дни недели пронумерованы следующим образом: 1 понедельник, 2 вторник. 6 суббота, 7 воскресенье. Дано целое число K, лежащее в диапазоне Определить номер дня недели для K-го дня года, если известно, что в этом году 1 января было вторником.

12 12 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 Integer27. Дни недели пронумерованы следующим образом: 1 понедельник, 2 вторник. 6 суббота, 7 воскресенье. Дано целое число K, лежащее в диапазоне Определить номер дня недели для K-го дня года, если известно, что в этом году 1 января было субботой. Integer28. Дни недели пронумерованы следующим образом: 1 понедельник, 2 вторник. 6 суббота, 7 воскресенье. Дано целое число K, лежащее в диапазоне 1 365, и целое число N, лежащее в диапазоне 1 7. Определить номер дня недели для K-го дня года, если известно, что в этом году 1 января было днем недели с номером N. Integer29. Даны целые положительные числа A, B, C. На прямоугольнике размера A B размещено максимально возможное количество квадратов со стороной C (без наложений). Найти количество квадратов, размещенных на прямоугольнике, а также площадь незанятой части прямоугольника. Integer30. Дан номер некоторого года (целое положительное число). Определить соответствующий ему номер столетия, учитывая, что, к примеру, началом 20 столетия был 1901 год. Логические выражения Во всех заданиях данной группы требуется вывести логическое значение TRUE, если приведенное высказывание для предложенных исходных данных является истинным, и значение FALSE в противном случае. Все числа, для которых указано количество цифр (двузначное число, трехзначное число и т. д.), считаются целыми положительными. Boolean1. Дано целое число A. Проверить истинность высказывания: «Число A является положительным». Boolean2. Дано целое число A. Проверить истинность высказывания: «Число A является нечетным». Boolean3. Дано целое число A. Проверить истинность высказывания: «Число A является четным». Boolean4. Даны два целых числа: A, B. Проверить истинность высказывания: «Справедливы неравенства A > 2 и B 3». Boolean5. Даны два целых числа: A, B. Проверить истинность высказывания: «Справедливы неравенства A 0 или B < 2». Boolean6. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Справедливо двойное неравенство A < B < C».

13 Логические выражения 13 Boolean7. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число B находится между числами A и C». Boolean8. Даны два целых числа: A, B. Проверить истинность высказывания: «Каждое из чисел A и B нечетное». Boolean9. Даны два целых числа: A, B. Проверить истинность высказывания: «Хотя бы одно из чисел A и B нечетное». Boolean10. Даны два целых числа: A, B. Проверить истинность высказывания: «Ровно одно из чисел A и B нечетное». Boolean11. Даны два целых числа: A, B. Проверить истинность высказывания: «Числа A и B имеют одинаковую четность». Boolean12. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Каждое из чисел A, B, C положительное». Boolean13. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Хотя бы одно из чисел A, B, C положительное». Boolean14. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Ровно одно из чисел A, B, C положительное». Boolean15. Даны три целых числа: A, B, C. Проверить истинность высказывания: «Ровно два из чисел A, B, C являются положительными». Boolean16. Дано целое положительное число. Проверить истинность высказывания: «Данное число является четным двузначным». Boolean17. Дано целое положительное число. Проверить истинность высказывания: «Данное число является нечетным трехзначным». Boolean18. Проверить истинность высказывания: «Среди трех данных целых чисел есть хотя бы одна пара совпадающих». Boolean19. Проверить истинность высказывания: «Среди трех данных целых чисел есть хотя бы одна пара взаимно противоположных». Boolean20. Дано трехзначное число. Проверить истинность высказывания: «Все цифры данного числа различны». Boolean21. Дано трехзначное число. Проверить истинность высказывания: «Цифры данного числа образуют возрастающую последовательность». Boolean22. Дано трехзначное число. Проверить истинность высказывания: «Цифры данного числа образуют возрастающую или убывающую последовательность». Boolean23. Дано четырехзначное число. Проверить истинность высказывания: «Данное число читается одинаково слева направо и справа налево». Boolean24. Даны числа A, B, C (число A не равно 0). Рассмотрев дискрими-

14 14 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 нант D = B 2 4 A C, проверить истинность высказывания: «Квадратное уравнение A x 2 + B x + C = 0 имеет вещественные корни». Boolean25. Даны числа x, y. Проверить истинность высказывания: «Точка с координатами (x, y) лежит во второй координатной четверти». Boolean26. Даны числа x, y. Проверить истинность высказывания: «Точка с координатами (x, y) лежит в четвертой координатной четверти». Boolean27. Даны числа x, y. Проверить истинность высказывания: «Точка с координатами (x, y) лежит во второй или третьей координатной четверти». Boolean28. Даны числа x, y. Проверить истинность высказывания: «Точка с координатами (x, y) лежит в первой или третьей координатной четверти». Boolean29. Даны числа x, y, x 1, y 1, x 2, y 2. Проверить истинность высказывания: «Точка с координатами (x, y) лежит внутри прямоугольника, левая верхняя вершина которого имеет координаты (x 1, y 1 ), правая нижняя (x 2, y 2 ), а стороны параллельны координатным осям». Boolean30. Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равносторонним». Boolean31. Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равнобедренным». Boolean32. Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника. Проверить истинность высказывания: «Треугольник со сторонами a, b, c является прямоугольным». Boolean33. Даны целые числа a, b, c. Проверить истинность высказывания: «Существует треугольник со сторонами a, b, c». Boolean34. Даны координаты поля шахматной доски x, y (целые числа, лежащие в диапазоне 1 8). Учитывая, что левое нижнее поле доски (1, 1) является черным, проверить истинность высказывания: «Данное поле является белым». Boolean35. Даны координаты двух различных полей шахматной доски x 1, y 1, x 2, y 2 (целые числа, лежащие в диапазоне 1 8). Проверить истинность высказывания: «Данные поля имеют одинаковый цвет». Boolean36. Даны координаты двух различных полей шахматной доски x 1, y 1, x 2, y 2 (целые числа, лежащие в диапазоне 1 8). Проверить истинность высказывания: «Ладья за один ход может перейти с одного поля на другое». Boolean37. Даны координаты двух различных полей шахматной доски x 1,

15 Условный оператор 15 y 1, x 2, y 2 (целые числа, лежащие в диапазоне 1 8). Проверить истинность высказывания: «Король за один ход может перейти с одного поля на другое». Boolean38. Даны координаты двух различных полей шахматной доски x 1, y 1, x 2, y 2 (целые числа, лежащие в диапазоне 1 8). Проверить истинность высказывания: «Слон за один ход может перейти с одного поля на другое». Boolean39. Даны координаты двух различных полей шахматной доски x 1, y 1, x 2, y 2 (целые числа, лежащие в диапазоне 1 8). Проверить истинность высказывания: «Ферзь за один ход может перейти с одного поля на другое». Boolean40. Даны координаты двух различных полей шахматной доски x 1, y 1, x 2, y 2 (целые числа, лежащие в диапазоне 1 8). Проверить истинность высказывания: «Конь за один ход может перейти с одного поля на другое». Условный оператор If1. Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. Вывести полученное число. If2. Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае вычесть из него 2. Вывести полученное число. If3. Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 2; если нулевым, то заменить его на 10. Вывести полученное число. If4. Даны три целых числа. Найти количество положительных чисел в исходном наборе. If5. Даны три целых числа. Найти количество положительных и количество отрицательных чисел в исходном наборе. If6. Даны два числа. Вывести большее из них. If7. Даны два числа. Вывести порядковый номер меньшего из них. If8. Даны два числа. Вывести вначале большее, а затем меньшее из них. If9. Даны две переменные вещественного типа: A, B. Перераспределить значения данных переменных так, чтобы в A оказалось меньшее из значений, а в B большее. Вывести новые значения переменных A и B. If10. Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.

16 16 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 If11. Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной большее из этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B. If12. Даны три числа. Найти наименьшее из них. If13. Даны три числа. Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим). If14. Даны три числа. Вывести вначале наименьшее, а затем наибольшее из данных чисел. If15. Даны три числа. Найти сумму двух наибольших из них. If16. Даны три переменные вещественного типа: A, B, C. Если их значения упорядочены по возрастанию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное. Вывести новые значения переменных A, B, C. If17. Даны три переменные вещественного типа: A, B, C. Если их значения упорядочены по возрастанию или убыванию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное. Вывести новые значения переменных A, B, C. If18. Даны три целых числа, одно из которых отлично от двух других, равных между собой. Определить порядковый номер числа, отличного от остальных. If19. Даны четыре целых числа, одно из которых отлично от трех других, равных между собой. Определить порядковый номер числа, отличного от остальных. If20. На числовой оси расположены три точки: A, B, C. Определить, какая из двух последних точек (B или C) расположена ближе к A, и вывести эту точку и ее расстояние от точки A. If21. Даны целочисленные координаты точки на плоскости. Если точка совпадает с началом координат, то вывести 0. Если точка не совпадает с началом координат, но лежит на оси OX или OY, то вывести соответственно 1 или 2. Если точка не лежит на координатных осях, то вывести 3. If22. Даны координаты точки, не лежащей на координатных осях OX и OY. Определить номер координатной четверти, в которой находится данная точка. If23. Даны целочисленные координаты трех вершин прямоугольника, стороны которого параллельны координатным осям. Найти координаты его четвер-

17 Оператор выбора 17 той вершины. If24. Для данного вещественного x найти значение следующей функции f, принимающей вещественные значения: f (x) = 2 sin(x), если x > 0, 6 x, если x 0. If25. Для данного целого x найти значение следующей функции f, принимающей значения целого типа: f (x) = 2 x, если x < 2 или x > 2, 3 x, в противном случае. If26. Для данного вещественного x найти значение следующей функции f, принимающей вещественные значения: x, если x 0, f (x) = x 2, если 0 < x < 2, 4, если x 2. If27. Для данного вещественного x найти значение следующей функции f, принимающей значения целого типа: 0, если x < 0, f (x) = 1, если x принадлежит [0, 1), [2, 3). 1, если x принадлежит [1, 2), [3, 4). If28. Дан номер года (положительное целое число). Определить количество дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный 366 дней. Високосным считается год, делящийся на 4, за исключением тех годов, которые делятся на 100 и не делятся на 400 (например, годы 300, 1300 и 1900 не являются високосными, а 1200 и 2000 являются). If29. Дано целое число. Вывести его строку-описание вида «отрицательное четное число», «нулевое число», «положительное нечетное число» и т. д. If30. Дано целое число, лежащее в диапазоне Вывести его строкуописание вида «четное двузначное число», «нечетное трехзначное число» и т. д. Оператор выбора Case1. Дано целое число в диапазоне 1 7. Вывести строку название дня недели, соответствующее данному числу (1 «понедельник», 2 «втор-

18 18 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 ник» и т. д.). Case2. Дано целое число K. Вывести строку-описание оценки, соответствующей числу K (1 «плохо», 2 «неудовлетворительно», 3 «удовлетворительно», 4 «хорошо», 5 «отлично»). Если K не лежит в диапазоне 1 5, то вывести строку «ошибка». Case3. Дан номер месяца целое число в диапазоне 1 12 (1 январь, 2 февраль и т. д.). Вывести название соответствующего времени года («зима», «весна», «лето», «осень»). Case4. Дан номер месяца целое число в диапазоне 1 12 (1 январь, 2 февраль и т. д.). Определить количество дней в этом месяце для невисокосного года. Case5. Арифметические действия над числами пронумерованы следующим образом: 1 сложение, 2 вычитание, 3 умножение, 4 деление. Дан номер действия N (целое число в диапазоне 1 4) и вещественные числа A и B (В не равно 0). Выполнить над числами указанное действие и вывести результат. Case6. Единицы длины пронумерованы следующим образом: 1 дециметр, 2 километр, 3 метр, 4 миллиметр, 5 сантиметр. Дан номер единицы длины (целое число в диапазоне 1 5) и длина отрезка в этих единицах (вещественное число). Найти длину отрезка в метрах. Case7. Единицы массы пронумерованы следующим образом: 1 килограмм, 2 миллиграмм, 3 грамм, 4 тонна, 5 центнер. Дан номер единицы массы (целое число в диапазоне 1 5) и масса тела в этих единицах (вещественное число). Найти массу тела в килограммах. Case8. Даны два целых числа: D (день) и M (месяц), определяющие правильную дату невисокосного года. Вывести значения D и M для даты, предшествующей указанной. Case9. Даны два целых числа: D (день) и M (месяц), определяющие правильную дату невисокосного года. Вывести значения D и M для даты, следующей за указанной. Case10. Робот может перемещаться в четырех направлениях («С» север, «З» запад, «Ю» юг, «В» восток) и принимать три цифровые команды: 0 продолжать движение, 1 поворот налево, 1 поворот направо. Дан символ C исходное направление робота и целое число N посланная ему команда. Вывести направление робота после выполнения полученной команды.

19 Оператор выбора 19 Case11. Локатор ориентирован на одну из сторон света («С» север, «З» запад, «Ю» юг, «В» восток) и может принимать три цифровые команды поворота: 1 поворот налево, 1 поворот направо, 2 поворот на 180. Дан символ C исходная ориентация локатора и целые числа N 1 и N 2 две посланные команды. Вывести ориентацию локатора после выполнения этих команд. Case12. Элементы окружности пронумерованы следующим образом: 1 радиус R, 2 диаметр D = 2 R, 3 длина L = 2 π R, 4 площадь круга S = π R 2. Дан номер одного из этих элементов и его значение. Вывести значения остальных элементов данной окружности (в том же порядке). В качестве значения π использовать Case13. Элементы равнобедренного прямоугольного треугольника пронумерованы следующим образом: 1 катет a, 2 гипотенуза c = a 2, 3 высота h, опущенная на гипотенузу (h = c/2), 4 площадь S = c h/2. Дан номер одного из этих элементов и его значение. Вывести значения остальных элементов данного треугольника (в том же порядке). Case14. Элементы равностороннего треугольника пронумерованы следующим образом: 1 сторона a, 2 радиус R 1 вписанной окружности (R 1 = a 3/6), 3 радиус R 2 описанной окружности (R 2 = 2 R 1 ), 4 площадь S = a 2 3/4. Дан номер одного из этих элементов и его значение. Вывести значения остальных элементов данного треугольника (в том же порядке). Case15. Мастям игральных карт присвоены порядковые номера: 1 пики, 2 трефы, 3 бубны, 4 червы. Достоинству карт, старших десятки, присвоены номера: 11 валет, 12 дама, 13 король, 14 туз. Даны два целых числа: N достоинство (6 N 14) и M масть карты (1 M 4). Вывести название соответствующей карты вида «шестерка бубен», «дама червей», «туз треф» и т. п. Case16. Дано целое число в диапазоне 20 69, определяющее возраст (в годах). Вывести строку-описание указанного возраста, обеспечив правильное согласование числа со словом «год», например: 20 «двадцать лет», 32 «тридцать два года», 41 «сорок один год». Case17. Дано целое число в диапазоне 10 40, определяющее количество учебных заданий по некоторой теме. Вывести строку-описание указанного количества заданий, обеспечив правильное согласование числа со словами «учебное задание», например: 18 «восемнадцать учебных заданий»,

20 20 М. Э. Абрамян. Электронный задачник Programming Taskbook «двадцать три учебных задания», 31 «тридцать одно учебное задание». Case18. Дано целое число в диапазоне Вывести строку-описание данного числа, например: 256 «двести пятьдесят шесть», 814 «восемьсот четырнадцать». Case19. В восточном календаре принят 60-летний цикл, состоящий из 12- летних подциклов, обозначаемых названиями цвета: зеленый, красный, желтый, белый и черный. В каждом подцикле годы носят названия животных: крысы, коровы, тигра, зайца, дракона, змеи, лошади, овцы, обезьяны, курицы, собаки и свиньи. По номеру года определить его название, если 1984 год начало цикла: «год зеленой крысы». Case20. Даны два целых числа: D (день) и M (месяц), определяющие правильную дату. Вывести знак Зодиака, соответствующий этой дате: «Водолей» ( ), «Рыбы» ( ), «Овен» ( ), «Телец» ( ), «Близнецы» ( ), «Рак» ( ), «Лев» ( ), «Дева» ( ), «Весы» ( ), «Скорпион» ( ), «Стрелец» ( ), «Козерог» ( ). Цикл с параметром For1. Даны целые числа K и N (N > 0). Вывести N раз число K. For2. Даны два целых числа A и B (A < B). Вывести в порядке возрастания все целые числа, расположенные между A и B (включая сами числа A и B), а также количество N этих чисел. For3. Даны два целых числа A и B (A < B). Вывести в порядке убывания все целые числа, расположенные между A и B (не включая числа A и B), а также количество N этих чисел. For4. Дано вещественное число цена 1 кг конфет. Вывести стоимость 1, 2. 10 кг конфет. For5. Дано вещественное число цена 1 кг конфет. Вывести стоимость 0.1, 0.2. 1 кг конфет. For6. Дано вещественное число цена 1 кг конфет. Вывести стоимость 1.2, 1.4. 2 кг конфет. For7. Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно.

21 Цикл с параметром 21 For8. Даны два целых числа A и B (A < B). Найти произведение всех целых чисел от A до B включительно. For9. Даны два целых числа A и B (A < B). Найти сумму квадратов всех целых чисел от A до B включительно. For10. Дано целое число N (> 0). Найти сумму 1 + 1/2 + 1/ /N (вещественное число). For11. Дано целое число N (> 0). Найти сумму N 2 + (N + 1) 2 + (N + 2) (2 N) 2 (целое число). For12. Дано целое число N (> 0). Найти произведение (N сомножителей). For13. Дано целое число N (> 0). Найти значение выражения (N слагаемых, знаки чередуются). Условный оператор не использовать. For14. Дано целое число N (> 0). Найти квадрат данного числа, используя для его вычисления следующую формулу: N 2 = (2 N 1). После добавления к сумме каждого слагаемого выводить текущее значение суммы (в результате будут выведены квадраты всех целых чисел от 1 до N). For15. Дано вещественное число A и целое число N (> 0). Найти A в степени N: A N = A A. A (числа A перемножаются N раз). For16. Дано вещественное число A и целое число N (> 0). Используя один цикл, вывести все целые степени числа A от 1 до N. For17. Дано вещественное число A и целое число N (> 0). Используя один цикл, найти сумму 1 + A + A 2 + A A N. For18. Дано вещественное число A и целое число N (> 0). Используя один цикл, найти значение выражения 1 A + A 2 A ( 1) N A N. Условный оператор не использовать. For19. Дано целое число N (> 0). Найти произведение

22 22 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 N! = N (N факториал). Чтобы избежать целочисленного переполнения, вычислять это произведение с помощью вещественной переменной и вывести его как вещественное число. For20. Дано целое число N (> 0). Используя один цикл, найти сумму 1! + 2! + 3! N! (выражение N! N факториал обозначает произведение всех целых чисел от 1 до N: N! = N). Чтобы избежать целочисленного переполнения, проводить вычисления с помощью вещественных переменных и вывести результат как вещественное число. For21. Дано целое число N (> 0). Используя один цикл, найти сумму 1 + 1/(1!) + 1/(2!) + 1/(3!) /(N!) (выражение N! N факториал обозначает произведение всех целых чисел от 1 до N: N! = N). Полученное число является приближенным значением константы e = exp(1). For22. Дано вещественное число X и целое число N (> 0). Найти значение выражения 1 + X + X 2 /(2!) X N /(N!) (N! = N). Полученное число является приближенным значением функции exp в точке X. For23. Дано вещественное число X и целое число N (> 0). Найти значение выражения X X 3 /(3!) + X 5 /(5!). + ( 1) N X 2 N+1 /((2 N+1)!) (N! = N). Полученное число является приближенным значением функции sin в точке X. For24. Дано вещественное число X и целое число N (> 0). Найти значение выражения 1 X 2 /(2!) + X 4 /(4!). + ( 1) N X 2 N /((2 N)!) (N! = N). Полученное число является приближенным значением функции cos в точке X. For25. Дано вещественное число X ( X < 1) и целое число N (> 0). Найти значение выражения X X 2 /2 + X 3 / ( 1) N 1 X N /N. Полученное число является приближенным значением функции ln в точке 1 + X. For26. Дано вещественное число X ( X < 1) и целое число N (> 0). Найти

23 Цикл с параметром 23 значение выражения X X 3 /3 + X 5 / ( 1) N X 2 N+1 /(2 N+1). Полученное число является приближенным значением функции arctg в точке X. For27. Дано вещественное число X ( X < 1) и целое число N (> 0). Найти значение выражения X + 1 X 3 /(2 3) X 5 /(2 4 5) (2 N 1) X 2 N+1 /( (2 N) (2 N+1)). Полученное число является приближенным значением функции arcsin в точке X. For28. Дано вещественное число X ( X < 1) и целое число N (> 0). Найти значение выражения 1 + X /2 1 X 2 /(2 4) X 3 /(2 4 6) ( 1) N (2 N 3) X N /( (2 N)). Полученное число является приближенным значением функции 1+X. For29. Дано целое число N (> 1) и две вещественные точки на числовой оси: A, B (A < B). Отрезок [A, B] разбит на N равных отрезков. Вывести H длину каждого отрезка, а также набор точек A, A + H, A + 2 H, A + 3 H. B, образующий разбиение отрезка [A, B]. For30. Дано целое число N (> 1) и две вещественные точки на числовой оси: A, B (A < B). Отрезок [A, B] разбит на N равных отрезков. Вывести H длину каждого отрезка, а также значения функции F(X ) = 1 sin(x ) в точках, разбивающих отрезок [A, B]: F(A), F(A + H), F(A + 2 H). F(B). For31. Дано целое число N (> 0). Последовательность вещественных чисел A K определяется следующим образом: A 0 = 2, A K = 2 + 1/A K 1, K = 1, 2. Вывести элементы A 1, A 2. A N. For32. Дано целое число N (> 0). Последовательность вещественных чисел A K определяется следующим образом: A 0 = 1, A K = (A K 1 + 1)/K, K = 1, 2. Вывести элементы A 1, A 2. A N. For33. Дано целое число N (> 1). Последовательность чисел Фибоначчи F K (целого типа) определяется следующим образом: F 1 = 1, F 2 = 1, F K = F K 2 + F K 1, K = 3, 4.

24 24 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 Вывести элементы F 1, F 2. F N. For34. Дано целое число N (> 1). Последовательность вещественных чисел A K определяется следующим образом: A 1 = 1, A 2 = 2, A K = (A K A K 1 )/3, K = 3, 4. Вывести элементы A 1, A 2. A N. For35. Дано целое число N (> 2). Последовательность целых чисел A K определяется следующим образом: A 1 = 1, A 2 = 2, A 3 = 3, A K = A K 1 + A K 2 2 A K 3, K = 4, 5. Вывести элементы A 1, A 2. A N. Вложенные циклы For36. Даны целые положительные числа N и K. Найти сумму 1 K + 2 K N K. Чтобы избежать целочисленного переполнения, вычислять слагаемые этой суммы с помощью вещественной переменной и выводить результат как вещественное число. For37. Дано целое число N (> 0). Найти сумму N N. Чтобы избежать целочисленного переполнения, вычислять слагаемые этой суммы с помощью вещественной переменной и выводить результат как вещественное число. For38. Дано целое число N (> 0). Найти сумму 1 N + 2 N N 1. Чтобы избежать целочисленного переполнения, вычислять слагаемые этой суммы с помощью вещественной переменной и выводить результат как вещественное число. For39. Даны целые положительные числа A и B (A < B). Вывести все целые числа от A до B включительно; при этом каждое число должно выводиться столько раз, каково его значение (например, число 3 выводится 3 раза). For40. Даны целые числа A и B (A < B). Вывести все целые числа от A до B включительно; при этом число A должно выводиться 1 раз, число A + 1 должно выводиться 2 раза и т. д.

25 Цикл с условием 25 Цикл с условием While1. Даны положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Не используя операции умножения и деления, найти длину незанятой части отрезка A. While2. Даны положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Не используя операции умножения и деления, найти количество отрезков B, размещенных на отрезке A. While3. Даны целые положительные числа N и K. Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а также остаток от этого деления. While4. Дано целое число N (> 0). Если оно является степенью числа 3, то вывести TRUE, если не является вывести FALSE. While5. Дано целое число N (> 0), являющееся некоторой степенью числа 2: N = 2 K. Найти целое число K показатель этой степени. While6. Дано целое число N (> 0). Найти двойной факториал N: N!! = N (N 2) (N 4). (последний сомножитель равен 2, если N четное, и 1, если N нечетное). Чтобы избежать целочисленного переполнения, вычислять это произведение с помощью вещественной переменной и вывести его как вещественное число. While7. Дано целое число N (> 0). Найти наименьшее целое положительное число K, квадрат которого превосходит N: K 2 > N. Функцию извлечения квадратного корня не использовать. While8. Дано целое число N (> 0). Найти наибольшее целое число K, квадрат которого не превосходит N: K 2 N. Функцию извлечения квадратного корня не использовать. While9. Дано целое число N (> 1). Найти наименьшее целое число K, при котором выполняется неравенство 3 K > N. While10. Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство 3 K < N. While11. Дано целое число N (> 1). Вывести наименьшее из целых чисел K, для которых сумма K будет больше или равна N, и саму эту сумму.

26 26 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 While12. Дано целое число N (> 1). Вывести наибольшее из целых чисел K, для которых сумма K будет меньше или равна N, и саму эту сумму. While13. Дано число A (> 1). Вывести наименьшее из целых чисел K, для которых сумма 1 + 1/ /K будет больше A, и саму эту сумму. While14. Дано число A (> 1). Вывести наибольшее из целых чисел K, для которых сумма 1 + 1/ /K будет меньше A, и саму эту сумму. While15. Начальный вклад в банке равен 1000 руб. Через каждый месяц размер вклада увеличивается на P процентов от имеющейся суммы (P вещественное число, 0 < P < 25). По данному P определить, через сколько месяцев размер вклада превысит 1100 руб., и вывести найденное количество месяцев K (целое число) и итоговый размер вклада S (вещественное число). While16. Спортсмен-лыжник начал тренировки, пробежав в первый день 10 км. Каждый следующий день он увеличивал длину пробега на P процентов от пробега предыдущего дня (P вещественное, 0 < P < 50). По данному P определить, после какого дня суммарный пробег лыжника за все дни превысит 200 км, и вывести найденное количество дней K (целое) и суммарный пробег S (вещественное число). While17. Дано целое число N (> 0). Используя операции деления нацело и взятия остатка от деления, вывести все его цифры, начиная с самой правой (разряда единиц). While18. Дано целое число N (> 0). Используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр. While19. Дано целое число N (> 0). Используя операции деления нацело и взятия остатка от деления, найти число, полученное при прочтении числа N справа налево. While20. Дано целое число N (> 0). С помощью операций деления нацело и взятия остатка от деления определить, имеется ли в записи числа N цифра «2». Если имеется, то вывести TRUE, если нет вывести FALSE. While21. Дано целое число N (> 0). С помощью операций деления нацело и взятия остатка от деления определить, имеются ли в записи числа N нечетные цифры. Если имеются, то вывести TRUE, если нет вывести FALSE. While22. Дано целое число N (> 1). Если оно является простым, то есть не имеет положительных делителей, кроме 1 и самого себя, то вывести TRUE,

27 Последовательности 27 иначе вывести FALSE. While23. Даны целые положительные числа A и B. Найти их наибольший общий делитель (НОД), используя алгоритм Евклида: НОД(A, B) = НОД(B, A mod B), если B 0; НОД(A, 0) = A. While24. Дано целое число N (> 1). Последовательность чисел Фибоначчи F K определяется следующим образом: F 1 = 1, F 2 = 1, F K = F K 2 + F K 1, K = 3, 4. Проверить, является ли число N числом Фибоначчи. Если является, то вывести TRUE, если нет вывести FALSE. While25. Дано целое число N (> 1). Найти первое число Фибоначчи, большее N. (определение чисел Фибоначчи дано в задании While24). While26. Дано целое число N (> 1), являющееся числом Фибоначчи: N = F K (определение чисел Фибоначчи дано в задании While24). Найти целые числа F K 1 и F K+1 предыдущее и последующее числа Фибоначчи. While27. Дано целое число N (> 1), являющееся числом Фибоначчи: N = F K (определение чисел Фибоначчи дано в задании While24). Найти целое число K порядковый номер числа Фибоначчи N. While28. Дано вещественное число ε (> 0). Последовательность вещественных чисел A K определяется следующим образом: A 1 = 2, A K = 2 + 1/A K 1, K = 2, 3. Найти первый из номеров K, для которых выполняется условие A K A K 1 < ε, и вывести этот номер, а также числа A K 1 и A K. While29. Дано вещественное число ε (> 0). Последовательность вещественных чисел A K определяется следующим образом: A 1 = 1, A 2 = 2, A K = (A K A K 1 )/3, K = 3, 4. Найти первый из номеров K, для которых выполняется условие A K A K 1 < ε, и вывести этот номер, а также числа A K 1 и A K. While30. Даны положительные числа A, B, C. На прямоугольнике размера A B размещено максимально возможное количество квадратов со стороной C (без наложений). Найти количество квадратов, размещенных на прямоугольнике. Операции умножения и деления не использовать. Последовательности Во всех заданиях данной группы предполагается, что исходный набор содержит ненулевое число элементов (в частности, число N всегда больше

28 28 М. Э. Абрамян. Электронный задачник Programming Taskbook 4.5 нуля). В заданиях на обработку нескольких наборов чисел (Series29 Series40) количество наборов K также всегда является ненулевым. Series1. Даны десять вещественных чисел. Найти их сумму. Series2. Даны десять вещественных чисел. Найти их произведение. Series3. Даны десять вещественных чисел. Найти их среднее арифметическое. Series4. Дано целое число N и набор из N вещественных чисел. Вывести сумму и произведение чисел из данного набора. Series5. Дано целое число N и набор из N положительных вещественных чисел. Вывести в том же порядке целые части всех чисел из данного набора (как вещественные числа с нулевой дробной частью), а также сумму всех целых частей. Series6. Дано целое число N и набор из N положительных вещественных чисел. Вывести в том же порядке дробные части всех чисел из данного набора (как вещественные числа с нулевой целой частью), а также произведение всех дробных частей. Series7. Дано целое число N и набор из N вещественных чисел. Вывести в том же порядке округленные значения всех чисел из данного набора (как целые числа), а также сумму всех округленных значений. Series8. Дано целое число N и набор из N целых чисел. Вывести в том же порядке все четные числа из данного набора и количество K таких чисел. Series9. Дано целое число N и набор из N целых чисел. Вывести в том же порядке номера всех нечетных чисел из данного набора и количество K таких чисел. Series10. Дано целое число N и набор из N целых чисел. Если в наборе имеются положительные числа, то вывести TRUE; в противном случае вывести FALSE. Series11. Даны целые числа K, N и набор из N целых чисел. Если в наборе имеются числа, меньшие K, то вывести TRUE; в противном случае вывести FALSE. Series12. Дан набор ненулевых целых чисел; признак его завершения число 0. Вывести количество чисел в наборе. Series13. Дан набор ненулевых целых чисел; признак его завершения число 0. Вывести сумму всех положительных четных чисел из данного набора. Если требуемые числа в наборе отсутствуют, то вывести 0. Series14. Дано целое число K и набор ненулевых целых чисел; признак его завершения число 0. Вывести количество чисел в наборе, меньших K.

📎📎📎📎📎📎📎📎📎📎