ТЕКСТЫ ОЛИМПИАДНЫХ ЗАДАНИЙ ПО ИНФОРМАТИКЕ И ИКТ
школьная ОЛИМПИАДА 2011-2012 УЧЕБНЫЙ ГОД
8 - 11 класс
Задача 8 - 11.1.
1. Будем называть числа круглыми, если они содержат в своей записи только цифры 0 и 5.
2. Составим последовательность круглых чисел в порядке возрастания: 0, 5, 50, 55, 500, 505 и так далее.
3. Необходимо написать программу, которая находит K-ое по порядку в этой последовательности круглое число.
Входные данные
Со стандартного потока ввода вводится натуральное число K — номер круглого числа в последовательности (0 < K < 500).
Выходные данные
Выведите на экран требуемое круглое число.
Примеры
Задача 8 - 11.2. Напишите программу, которая по введенному целому числу A(0≤A≤999) находит сумму цифр этого числа S.
Ввод. Ваша программа должна вводить с клавиатуры число A.
Вывод. Ваша программа должна выводить на экран число S.
Пример.
Ввод Вывод
123 6
Задача 8 - 11.3. Для участников олимпиады школьников по информатике проводится лотерея. Каждый участник получает билет с четырехзначным номером. По условию лотереи выигрышными являются билеты сразу двух участников, если при этом сумма первых двух цифр билета первого участника равна сумме последних двух цифр билета второго или наоборот. Например: 4571 и 1890 – счастливая пара, так как 4+5=9 и 9+0=9, 7712 и 3031 – счастливая пара, так как 1+2=3 и 3+0=3. Напишите программу, в которой вводятся два четырехзначных целых числа, а выводится сообщение «Счастливы вместе», если для введенной пары номеров выполняется условие выигрыша, и сообщение «Повезет в другой раз» в противном случае.
Ограничение: использовать в решении этой задачи функции и процедуры преобразования чисел в строки и наоборот недопустимо.
Тестовые примеры
Входные данные
|
Выходные данные
|
4315, 2411
|
«Счастливы вместе»
|
4782, 9183
|
«Счастливы вместе»
|
9213, 1129
|
«Счастливы вместе»
|
1223, 3322
|
«Повезет в другой раз»
|
4498, 3399
|
«Повезет в другой раз»
|
6588, 8734
|
«Повезет в другой раз»
|
На выполнение олимпиадных заданий отводится 3 астрономических часа.
Каждое задние оценивается в зависимости от полноты выполнения:
задание № 1 – 50 баллов,
задание № 2 – 20 баллов,
задание № 3 – 100 баллов,
Призерами олимпиады становятся все учащиеся, набравшие 85 баллов и более. Ученик, набравший максимальное количество баллов становится победителем.
Решение
Задача 8 - 11.1.
Будем называть числа круглыми, если они содержат в своей записи только цифры 0 и 5.
Составим последовательность круглых чмсел в порядке возрастания: 0, 5, 50, 55, 500, 505 и так далее. Написать программу, которая находит K-ое по порядку в этой последовательности круглое число. Формат входных данных С клавиатуры вводится натуральное число K - номер круглого числа в последовательности (0 < K < 500) Формат выходных данных Выведите на экран требуемое круглое число.
Dim k, a, z As Integer
Dim r, h As String
Private Sub Command1_Click()
К =InpunBox(«Введите натуральное число К от 0 до 500»)
h = ""
Do While к> 0
a = кMod 2
к= к\ 2
r = Str(a)
h = h + r
z=z+1
Loop
For i=1 to z
If Mid(h,I,1)=”1” then
Mid((h,I,1)=”5”
Next i
Print k; “круглое число=”; h
End Sub
Задача 8 - 11.2.
Private Sub Command1_Click()
A = InputBox("ВВедите число от 0 до 999")
Do While A <> 0
B = A - Int(A / 10) * 10
S = S + B
A = Int(A / 10)
Loop
Print S
End Sub
|