http://pascalabc.net/ssyilki-dlya-skachivaniya

Найди пару.exe

Счёт до 16 .exe


1.       Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Какой суммарный путь пробежит спортсмен за N дней?

2.       Вычислить сумму N четных чисел от X.

3.       Вычислить сумму всех простых чисел от 1 до N.

4.       Даны n случайных чисел в диапазоне от -40 до 0. Найти среднее арифметическое нечётных.

5.       Напишите программу, определяющую сумму всех нечетных чисел от 1 до 99.

6.       Составьте программу, вычисляющую A*B, не пользуясь операцией умножения. А и B любое натуральное число.

7.       Дано натуральное число N. Определить, является ли оно совершенным. Совершенное число N равно сумме всех своих делителей, не превосходящих само N.

8.       Вычислить произведение всех нечетных чисел от 1 до 2*N+1

9.       Начальный вклад в сберкассу составил А рублей. Через сколько лет он станет больше B рублей. (Каждый год вклад увеличивается на 3%).

10.   Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число — минимальное число, кратное 3.

11.   Заданы два целых числа A и B, написать программу, которая вычисляет сумму целых чисел между A и B.

12.   Вывести на экран кубы чисел от A до B

13.   Вывести факториал числа n. n – вводится с клавиатуры.

14.   Задано натуральное число N. Найти количество натуральных чисел, не превосходящих N и не делящихся ни на одно из чисел 2,3,5.

15.   Найти произведение двузначных нечетных чисел кратных 13.

16.   Напечатать те из двузначных чисел которые делятся на 4, но не делятся на 6.

17.   Составьте программу получения в порядке убывания всех делителей данного числа

18.   Составьте программу определения наибольшего общего делителя двух натуральных чисел.

19.   Составьте программу определения наименьшего общего кратного двух натуральных чисел.

20.   Составьте программу, подсчитывающую количество цифр вводимого вами целого неотрицательного числа.

21.   Составьте программу, определяющую максимальное из всех вводимых вами чисел. Концом ввода чисел является введенное число 0

22.   Составьте программу, определяющую минимальное из всех вводимых вами чисел. Концом ввода чисел является введенное число 0. ( 0 – не входит в последовательность)

23.   Найти все трехзначные числа, сумма цифр которых равна данному целому числу.

24.   Найти все двузначные числа, сумма цифр которых делится на 4.

25.   Написать программу, которая вводит с клавиатуры 5 дробных чисел и вычисляет их среднее арифметическое

26.   Написать программу, которая вычисляет среднее арифметическое вводимой с клавиатуры последовательности дробных чисел. Количество чисел должно задаваться вначале программы.

27.   Написать программу, которая генерирует 10 случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее арифметическое.

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

29.   Написать программу, которая "задумывает" число в диапазоне от 1 до 10 и предлагает пользователю угадать число за 5 попыток.

30.   Вывести на экран число пи с помощью Ряда Лейбница с точностью в 10000 дробей.

31.   Вводится число, найти произведение цифр.

32.   Вводится последовательность чисел. Найти количество чисел, оканчивающихся на 0 или 2, или 3, или5. (0-признак окончания ввода, не входит в последовательность).

33.   Найти сумму трёхзначных чисел, не кратных 2 или 3 или 5.

34.   Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (включая сами эти числа), в порядке их возрастания, а также количество N этих чисел.

35.   Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (не включая сами эти числа), в порядке их убывания, а также количество N этих чисел.

36.   Дано натуральное число n. Вывести на экран n первых простых чисел.

37.   Даны вещественные числа a, b и c, причем a отлично от 0. Решить квадратное уравнение ax2 + bx + c = 0 или сообщить о том, что действительных решений нет.

38.   Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, оканчивающихся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа.

39.   Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 6. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 6.

40.   Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3.

41.   Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 5. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 5.

42.   Вводится число в двоичной СС, написать программу для перевода числа в 10-ую СС.

43.   Вводится последовательность чисел. Найти среднее арифметическое чётных. 0-признак окончания ввода и не входит в последовательность.

44.   Вводится последовательность чисел. Найти среднее арифметическое нечётных чисел, кратных 3. 0-признак окончания ввода и не входит в последовательность.

45.   Вводится последовательность чисел. Найти среднее арифметическое чётных. 0-признак окончания ввода и не входит в последовательность.

46.   Даны двухзначные числа. Найти среднее арифметическое чётных чисел, кратных 3.

47.   Вводится целое число. Удалить все 1 и 0.

48.   Вывести двузначные числа, которые кратны и 2, и 3, и 7.

49.   Вывести трёхзначные числа, которые кратны и 2, и 3, и 7.

50.   Вводятся числа, пока не 0. Найти произведение нечётных.

51.   Вводятся числа, пока не 0. Найти произведение нечётных, кратных 3.

52.   Вводятся отрицательные числа, пока не 0. Найти количество кратных 3 и 5.

53.   В программе задаются N случайных чисел в диапазоне от -50 до 50. Найти сумму чисел оканчивающихся на 0 или 2, или 6.

54.   Даны трёхзначные числа. Вывести количество чисел, сумма цифр которых = 6.

55.   Вводится число. Узнать сколько цифр в числе.

56.   Вводится число. Узнать сколько делителей у данного числа.

57.   Даны трёхзначные числа. Найти сумму чисел, оканчивающихся на 1 или 2 и кратных 4 или 3.

58.   Вводится число. Если оно простое вывести «1», иначе «0».

59.   Даны двухзначные числа. Найти сумму простых.

60.   Даны трёхзначные числа. Найти количество простых.

61.   Вывести степени двойки (от 0 до 10)

62.   Вводится число. Найти количество чётных цифр числа.

63.   Вводится число. Найти сумму нечётных цифр числа.

64.   Вводится число. Найти количество цифр числа кратных 3.

65.   Вводится n  чисел. Найти произведение чисел нечётных, кратных 3 и 5.

66.   Вводится n чисел. Найти среднее арифметическое положительных чётных чисел.

67.   Вводится n чисел. Найти сумму отрицательных чётных чисел.

68.   Вводятся числа, пока не 0. Найти количество нечётных чисел, оканчивающихся на 3.

69.   Вводятся числа. Найти среднее арифметическое положительных, кратных 5. 0 - признак окончания ввода.

70.   Вводятся 2 положительных числа. Вывести то, в котором сумма цифр больше.

71.   Вводятся n чисел. Найти наибольшее.

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

73. Написать программу вычисления стоимости покупки с учётом скидки. Скидка в 3% предоставляется в том случае, если сумма покупки больше 500 руб., в 5 % - если сумма больше 1000 руб.

74. Даны вещественные положительные числа a,b,c. Определите, существует ли треугольник со сторонами a,b,c, и если да, то определить является ли он прямоугольным.

75. Запишите на языке Паскаль программу, реализующую алгоритм работы кассира, выдающего покупателю сдачу (s) наименьшим возможным количеством банкнот по 1000 (k1000),500 (k500), 100 (k100), 50 (k50)

76. Идёт x-я секунда суток. Разработайте программу, которая по введённой x секунде суток определяет, сколько целых часов h, целых минут m и секунд s прошло с начала суток.

77. Создать программу которая рисует при помощи стрелок в графическом окне

78. Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введён ноль) и подсчёт суммы и среднего арифметического введённых положительных чисел. Используйте оператор repeat.

79. Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введён ноль) и определение максимального (наибольшего) из введённых чисел. Используйте оператор repeat.

80. Даны две точки в плоской прямоугольной системе координат. Напишите программу, определяющую, которая из точек находится ближе к началу координат.

81. Уличный продавец газет получает а рублей с продажи каждой из первых 50 газет. С продажи каждой из последующих газет он получает на 20% больше. Разработайте программу, которая вычислит заработок продавца, если он продаст за день 200 газет. Зафиксируйте свои действия на каждом из этапов решения этой задачи.

82. В аэробусе, вмещающем 160 пассажиров, три четверти мест находятся в салонах экономического класса и одна четверть мест — в салоне бизнес-класса. Стоимость билета в салоне бизнес-класса составляет х рублей, что в два раза выше стоимости билета в салонах экономического класса. Разработайте программу, которая вычислит сумму денег, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов экономического класса.

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

84. В классе 20 учеников писали диктант по русскому языку. Напишите программу, подсчитывающую количество двоек, троек, четвёрок и пятёрок, полученных за диктант.

85. Объявлен набор в школьную баскетбольную команду. Известен рост каждого из п учеников, желающих попасть в эту команду. Составьте алгоритм подсчёта количества претендентов, имеющих шанс попасть в команду, если рост игрока команды должен быть не менее 170 см. Запишите на языке Паскаль программу. Считайте рост претендента в команду случайным числом из диапазона от 150 до 200 см, а число претендентов п = 50.

86. В целочисленных массивах а и b содержатся длины катетов десяти прямоугольных треугольников (a[i] — длина первого катета, b[i] — длина второго катета i-ro треугольника). Найдите треугольник с наибольшей площадью. Выведите его номер, длины катетов и площадь. Предусмотрите случай, когда таких треугольников несколько.

87. Напишите программу вычисления наименьшего общего кратного следующих четырёх чисел: 36, 54, 18 и 15. В программе используйте процедуру вычисления наибольшего общего делителя двух чисел.

88. Видоизмените программу сортировки массива выбором так, чтобы в ней использовалась процедура выбора наибольшего элемента массива.

89. Напишите функцию, вычисляющую длину отрезка по координатам его концов. С помощью этой функции напишите программу, вычисляющую периметр треугольника по координатам его вершин.

90. Напишите функцию, вычисляющую площадь треугольника по целочисленным координатам его вершин. С помощью этой функции вычислите площадь четырёхугольника по координатам его вершин.

91. Вычислите 32-битовый IP-адрес в виде четырёх десятичных чисел, разделённых точками:
1) 11001100100110001011111001000111 2) 11011110110000111010001000110010

92.       Вычислите IP-адрес из четырёх десятичных чисел в 32-битном виде:
1) 210.171.30.128 2) 10.55.0.225

93. Игра GeometryDash