Задачи сложности c

1. Составить программу, которая выводит сообщение о своих возможностях

{Введите номер необходимой функции: 1 - квадрат; 2 - корень квадратный; 3 - синус; 4 - косинус}

2. Составить программу, которая выводит сообщение о своих возможностях

{Введите номер необходимой операции: 1 - сумма; 2 - разность; 3 - произведение; 4 - частное}

3. Напишите программу для вычисления степени введённого с клавиатур числа. Степень в диапазоне 0 .. 9.

Контрольные вопросы

1.Тест №2.

2. Каким будет значение переменной y после выполнения следующих фрагментов программ?

1) … x:=30; case 3+x div 8 of 1, 2, 3: y:=10; 4..7: y:=20; 8..30: y:=30; else y:=100; end; Ответ: __________.

2) … x:= ‘c’; case succ(x) of ‘0’.. ‘9’: y:=1; ‘b’: y:=2; ‘c’: y:=3; ‘d’: y:=4; ‘e’ : y:=5; else y:=100; end; Ответ: __________.

3) … x:=2*3; case x of 2, 3: y:=1; 4: y:=2; 6-1, 1: y:=3; 7, 5: y:=4; 1, 2, 5+1: y:=5; else y:=100; end; Ответ: __________.

Дополнительное задание

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

2.Выяснить, в какой координатной четверти расположен треугольник, образованный прямой, заданной уравнением y=ax+b и осями координат.

Урок 3 Операторы повтора

Цель

Научиться владеть принципом работы операторов цикла и областью их применения.

Задачи

• Дать основное назначение работы ЦИКЛА.

• Научиться использовать оператор FOR (цикл с заданными параметрами), синтаксис его записи, назначение и работу переменной цикла.

• Научиться использовать операторы WHILE(с предусловием) REPEAT …UNTIL (с постусловием).

• Научиться манипулировать работой цикла: (понятия бесконечного цикла, либо его прерывания).

• Дать анализ работы трех циклов.

I. Оператор цикла с заданными параметрами for Основные понятия

a)Оператор цикла FOR с положительным шагом – используется, когда изменение параметра цикла увеличивается на 1.

FOR <пар_цик> := <S1> TO <S2> DO <оператор>;

б)Оператор цикла FOR с отрицательным шагом – используется, когда изменение параметра цикла уменьшается на 1 ,

FOR <пар_цик> := <S1> DOWNTO <S2> DO <оператор>;

где

<пар_цик>—целого либо перечисляемого типа

Задания Задача сложности a

1.Каждая бактерия делится на две в течении 1 мин. В начальный момент времени имеется одна бактерия. Сколько их станет через 10 минут.

2.В течении двух недель человек заключает пари на скачках . В первый день он делает ставку в 1 фунт и проигрывает . Во второй день, чтобы возместить свой выигрыш, он делает ставку в 2 фунта, однако опять проигрывает. На третий день он ставит 3 фунта, но опять проигрывает. Он упрямо продолжает увеличивать на 1 фунт свою ставку, но продолжает проигрывать. Написать программу, выводящую на экран сумму денег, поигранную этим человеком к концу второй недели.

3.Вычислить A(A+1)(A+2)...(A+N), для A и N введённых с клавиатуры.