практическая работа. Задание к зачету по МДК 01. Задание к зачету по мдк 01. 02. Вложенные условные операторы
 Скачать 15.12 Kb.
|
Задание к зачету по МДК 01.02.ВЛОЖЕННЫЕ УСЛОВНЫЕ ОПЕРАТОРЫЗадание 1. Составьте программу, которая «задумывает» случайное число в промежутке от 1 до 10 и предлагает пользователю его отгадать с трех попыток. При этом, если вводимое пользователем число больше загаданного, то программа печатает слово «Больше!», а если меньше, то слово «Меньше!». Y:=Random(9)+1; {загадываем случайное число в диапазоне от 1 до 10} X:= StrToInt(InputBox(‘Ввод числа’,’Введите число’,’’)); If x=y then Memo1.lines.add(‘вы угадали’) Else Begin If x>y then Memo1.Lines.Add(‘Меньше’) Else Memo1.Lines.Add(‘Больше’); X:= StrToInt(InputBox(‘Ввод числа’,’Введите число’,’’)); … {Дописать самостоятельно еще 2 попытки} End; ОПЕРАТОР ВЫБОРА CASEЗадание 2. Составить программу, которая после введенного с клавиатуры числа (в диапазоне от 1 до 99), обозначающего денежную единицу, дописывает слово «копейка» в правильной форме. Например: 5 копеек, 41 копейка и т.д. Тест 1. x=5, Результат – 5 копеек Тест 2. x=11, результат – 11 копеек Тест 3. x=1, результат – 1 копейка Тест 4. x=12, результат – 12 копеек Тест 5. x=2, результат – 2 копейки Тест 6. x=51, результат – 51 копейка Тест 7. x=99, результат – 99 копеек ЦИКЛ С ПАРАМЕТРОМЗадание 3. Написать программу поиска двухзначных чисел, обладающих следующим свойством: если к сумме цифр числа прибавить квадрат этой суммы, то получится снова данное число. Тест: результат – числа 12, 42, 90. ЦИКЛ С ПРЕДУСЛОВИЕМ И С ПОСТУСЛОВИЕМ Задание 4. Вводится натуральное число. Определить, количество цифр 5 в нем. Тест 1: х=1525, результат – 2 Тест 2: х=25, результат - 1 ВЛОЖЕННЫЕ ЦИКЛЫЗадание 5. Составить программу получения всех совершенных чисел, меньших заданного числа n. Совершенным является число, равное сумме всех своих положительных делителей (включая единицу, но исключая само число). Например, 28 – совершенное число, т.к. 28=1+2+4+7+14. Тест 1: n=30, результат – 6, 28 Тест 2: n=500, результат – 6,28, 496 |