Задания I уровня

1. Дана программа вычисления суммы S первых 100 членов ряда: 1+2+3+...+100:

На Интале Программа сумма Описание S, K,n: Целый Конец_Описания k:=1 s:=0 Повторять_Пока k<=100 S:=S+k K:=K+1 Завершить Вывод(S) Конец_Программы

на Паскале: var k,s: integer; begin s:=0; k:=1; while k<=100 do begin s:=s+k; k:=k+1; end; writeln('сумма=',s) end.

ВОПРОС: "исправьте" программу, чтобы цикл: а) не выполнился ни разу;

б) выполнялся неограниченное число раз.

2. Измените программу так, чтобы она вычисляла n значений этого ряда (надо ввести новую переменную, указав ее тип – integer (Целый) и с помощью оператора READ(N) (Ввод(n)) указывать количество членов ряда.)

3. Составьте программу решения следующей задачи: население города ежегодно увеличивается на 1/40 наличного состава жителей (сейчас в нем примерно 240 тыс.). Через сколько лет население города утроится? (тип переменой "население" –REAL (Вещественный))

1. В 1626 году индейцы продали остров Манхеттен за 20 долларов. Если бы эти деньги были помещены в банк на текущий счет и ежегодный прирост составлял бы 4%, какова была бы стоимость капитала в 2003 году?

2. Вы положили деньги (10 000 рублей) в банк под 5% ежемесячного прироста. Как выгоднее помещать деньги: под простой процент либо капитализированный (сложный)?

Вопросы: а) когда сумма вклада достигнет 30 000р.?

б) какой будет сумма вклада после 10 лет?

в) каковы будут ответы на предыдущие вопросы, если, начиная с 3-го года, процент вырос до 10%?

Задания II уровня

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

2. Числа Фибоначчи определяются как а(0)=1, а(1)=1, а(i)=a(i-1)+a(i-2). Найти десятое число Фибоначчи.

3. Готовясь к соревнованиям, лыжник в первый день побежал 10 км, затем каждый день увеличивал расстояние на 10%. Сколько километров пробежал он за неделю тренировок? На какой день он пробежал больше 15 км?

4. Вычисление факториала числа f=10! записать с использованием операторов цикла for, while, Repeat…until.

5. Два мудреца из Багдада Гафар и Чуфар загадали по одному натуральному числу. Cоставить программу, определяющую, чье число содержит больше простых делителей. Распечатать эти делители.

6. Два мудреца из Багдада Гафар и Чуфар загадали по одному натуральному числу. Cоставить программу, определяющую, чье число содержит больше различных простых делителей. Распечатать эти делители.

7. На старинной карте было зашифровано местонахождение клада. Чтобы узнать, сколько шагов надо сделать от башни на север, необходимо найти сумму шести чисел вида 3³ⁱ, т.е s=3³ +3⁶ + 3⁹ + 3¹² + 3¹⁵+ 3¹⁸. (Коротко это записывается так: ). Затем отделить 4 младшие цифры, найденное число и будет нужным числом шагов.

8. В сказочном магазине «Матматика» продавались игрушки. Цены на них являются степенями числа 2 – вот такая особенность этого магазина. Хрюша решил удивить своих друзей Степашу и Каркушу и купить самую дорогую игрушку, которую можно купить за имеющиеся у него деньги. У него с собой P рублей. Может ли он выполнить свое желание? Игрушку какой стоимости он купит?

9. На Киевскую Русь напали многоголовые Змеи-Горынычи. В Киеве в этот момент был только Илья Муромец. Его “производительность” –3 головы в час. Достаточно ли одного Ильи, чтобы за сутки очистить землю от нечисти или надо посылать гонцов за другими богатырями?

10. В соревнованиях итоговая оценка определяется так: самая наибольшая и самая наименьшая оценки из общей суммы удаляются (если таких оценок несколько, то удаляется только одна), затем среди оставшихся подсчитывается среднее арифметическое. Написать программу, которая позволила бы по 10 оценкам судей автоматически выставлять итоговую оценку спортсмену.

САМОСТОЯТЕЛЬНАЯ РАБОТА

1. Подсчитать количество шестизначных «счастливых» билетов (сумма первых трех цифр равна сумме трех последних). Напечатать все эти номера (например, 123402, 005122 и т. п.)

2. Чтобы открыть секретный сейф, агент 007 решил набирать в возрастающем порядке все трехзначные числа, в записи которых нет одинаковых цифр. Составить программу, которая бы печатала все такие числа. Определить, сколько времени потребуется ему в худшем случае для вскрытия сейфа, если для набора одного числа он тратит 2с?

3. Определить, сколько времени потребуется агенту 007 для вскрытия сейфа, если код– четырехразрядное число. Цифры могут повторяться.

Порядок выполнения (подсказки)

1. Запустить программу Паскаль	Для ОС ‘Windows’: найти ярлык программы либо через ”Пуск”, ”Программы” выбрать имя программы. Нажать клавишу мыши либо нажать ''Enter''.		Из системной оболочки: Установите подсветку на turbo.exe либо на bp.exe. Нажать клавишу мыши либо нажать ''Enter'' на клавиатуре
2.Открыть старый файл:		File/Open/''Enter''	выберите нужное имя файла из списка
3. Набрать текст программы		наберите текст программы, используя пункт меню «Edit».
4. Записать файл на диск:		нажмите ”F2”
5.Выполнить программу		нажмите Ctrl/F9
6. Просмотр результатов		нажмите Аlt/F5

КОНТРОЛЬНЫЕ ВОПРОСЫ:

1. Каково назначение режима Run системы Turbo?

1. Какие команды имеются в режиме Run?

1. Как записывается и работает оператор FOR?

1. Для организации каких циклов применим оператор FOR?

1. В чем отличие оператора WHILE от оператора REPEAT?

2. Что такое вложенные циклы?

ЛАБОРАТОРНАЯ РАБОТА

ТЕМА: ПРОГРАММИРОВАНИЕ РАЗВЕТВЛЯЮЩИХСЯ АЛГОРИТМОВ. КОМАНДА ВЕТВЛЕНИЯ.

ЦЕЛЬ: Изучить основные операторы и конструкции языка Паскаль для программирования разветвляющихся алгоритмов. Научиться использовать оператор IF в программах.

ПО: Turbo Pascal

КРАТКИЕ ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ:

Условный оператор позволяет проверить некоторое условие и в зависимости от результатов проверки, выполнить то или иное действие.

На алгоритмическом языке:	на языке Паскаль:
Полная форма команды ветвления:
Если условие То действие Иначе действие 2 Конец_Если	IF условие THEN оператор 1 ELSE оператор 2;
Неполная форма команды ветвления.
Если условие То действие Конец _Если	IF условие THEN оператор;

Команда IF выполняет после слов THEN, ELSE только один оператор.

Если требуются выполнить более чем один оператор, то цепочку операторов заключаем в операторные скобки BEGIN...END.

Для получения сложных условий простые условия объединяют с помощью скобок и операций AND(и), OR(или), NOT(не), например (х>-5) and (x<5) (простые условия заключаются в скобки и соединяются союзом).