Примеры задач Программа 1

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

Программа 1

program seasons;

var k:integer;

begin

writeln('введите номер месяца');

readln(k);

case k of

1,2,12:writeln('зима') ;

3,4,5:writeln('весна');

6,7,8:writeln('лето');

9,10,11:writeln('осень');

end;

end.

Программа 2

Составить программу, позволяющую получить словесное описание школьных отметок (1  плохо, 2  неудовлетворительно, 3  удовлетворительно, 4  хорошо, 5  отлично).

program zadacha_2;

var

d:integer; {оценка}

begin

writeln ('Введите отметку');

readln(d);

case d of {выбор}

1:begin

writeln('Плохо');

end;

2:begin

writeln('Неудовлетворительно');

end;

3:begin

writeln('Удовлетворительно');

end;

4:begin

writeln('Хорошо');

end;

5:begin

writeln('Отлично');

end;

end;

readln;

end.

Программа 3

Пусть элементами круга являются радиус (первый элемент), диаметр (второй элемент), длина окружности (третий элемент). Составить программу, которая по номеру элемента запрашивала бы его соответствующее значение площади круга.

program zadacha_6;

uses crt;

var

c,d,m,r:integer; {описываю данные}

s:real;

begin

clrscr;

writeln('введите номер элемента');

readln(m);

case m of

1:begin

writeln('введите радиус');

{Вычисление площади, если известен радиус}

readln(r);

s:=sqrt(r)*3.14;

writeln('s=',s);

readln;

end;

2:begin

writeln('введите диаметр');

{Вычисление площади, если известен диаметр}

readln(d);

s:=3.14*sqrt(d/2);

writeln('s=',s);

readln;

end;

3:begin

writeln('введите длину окружности');

{Вычисление площади, если известна длинаокружности}

readln(c);

s:=3.14*sqrt(c/6.28);

writeln('s=',s); {вывод результата на экран}

readln;

end;

end;

end.

Варианты заданий

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

2. Написать программу, которая запрашивает номер дня недели и выводит одно из сообщений: «Рабочий день», «Суббота», «Воскресенье».

3. Составить программу, которая в зависимости от порядкового номера месяца (1…12) выводит на экран количество дней в этом месяце. Рассмотреть два случая: год является високосным и год не является високосным (информация об этом вводится с клавиатуры).

4. Для натурального числа х напечатать фразу «мне х », согласовав окончание слова «лет» с числом х. Пример: «мне 17 лет», «мне 21 год».

5. Вывести номер четверти координатной плоскости, которой принадлежит точка с заданными координатами (x, y) при условии, что x <> 0, y <> 0.

6. Для натурального числа х напечатать фразу «мы нашли х грибов в лесу», согласовав окончание слова «гриб» с числом х. Пример: «мы нашли 5 грибов», «мы нашли 4 гриба», «мы нашли 42 гриба».

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

8. Написать программу, которая после введенного с клавиатуры числа (в диапазоне от 1 до 999), обозначающего денежную единицу, дописывает слово "рубль" в правильной форме. Например, 12 рублей, 21 рубль и т.д.

9. Написать программу, которая после введенного с клавиатуры числа (в диапазоне от 1 до 99), обозначающего денежную единицу, дописывает слово "копейка" в правильной форме. Например, 5 копеек, 41 копейка и т.д.

10. В старояпонском календаре был принят двенадцатилетний цикл. Года внутри цикла носили названия животных: крысы, коровы, тигра, зайца, дракона, змеи, лошади, овцы, обезьяны, петуха, собаки и свиньи. Написать программу, которая по номеру года определяет его название в старояпонском календаре, если известно, что 1996 год был годом крысы – год очередного цикла.

11. Составить программу для определения подходящего возраста кандидатуры для вступления в брак, используя следующее соображение: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины определяется соответственно как удвоенный возраст девушки минус 14.

12. Даны два действительных положительных числа. Арифметические действия над числами пронумерованы (1 – сложение, 2 – вычитание, 3 – умножение, 4 – деление). Составить программу, которая по введенному номеру выполняет то или иное действие над числами.

13. Написать программу, которая по вводимому числу от 1 до 12 (номеру месяца) выдает все приходящиеся на этот месяц праздничные дни (например, если введено число 1, то 1 января – Новый год, 7 января – Рождество.

14. Установить кратно ли данное целое число трем (если нет, то выдать остатки от деления.

15. Работа светофора для водителей запрограммирована следующим образом: в начале каждого часа в течение трех минут горит зеленый сигнал, затем в течение одной минуты – желтый, в течение двух минут – красный, в течение трех минут  опять зеленый и т.д. Дано число, означающее время в минутах, прошедшее сначала очередного часа. Определить, сигнал, какого цвета горит для водителей в этот момент.

16. Мастям игральных карт присвоены порядковые номера: «пики»-1, «крести»-2, «черви»-3, «бубни»-4. По заданному номеру масти определить название соответствующей масти.

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

1. Логические операции.

2. Случаи использования оператора множественного выбора.

3. Схемы алгоритмов множественного выбора.

4. Оператор CASE.

Лабораторная работа № 6

Программирование алгоритмов циклической структуры

Цель работы: овладение практическими навыками разработки и программирования вычислительного процесса разветвляющейся структуры.

Теоретические сведения

Часто при решении задач приходится многократно вычислять значения по одним и тем же математическим зависимостям для различных значений входящих в них величин. Такие многократно повторяемые участки вычислительного процесса называются циклами. Использование циклов позволяет существенно сократить объем схемы алгоритма и длину соответствующей ей программы. Различают циклы с заданным и с неизвестным числом повторений. К последним относятся итерационные циклы, характеризующиеся последовательным приближением к искомому значению с заданной точностью.

Для организации цикла необходимо выполнить следующие действия:

1. Задать начальное значение переменной, изменяющейся в цикле.

2. Изменять переменную перед каждым новым повторением цикла.

3. Проверять условие окончания или повторения цикла.

4. Управлять циклом, т.е. переходить к его началу, если он не закончен, или выходить из него по окончании. Последние три функции выполняются многократно.

Переменная, изменяющаяся в цикле, называется параметром цикла. В одном цикле может быть несколько параметров.

Переменную, значения которой вычисляются машиной и хранятся в одной и той же ячейке памяти, называют простой переменной, а переменную, являющуюся элементом массива – переменной с индексом. Следует иметь в виду, что параметром цикла является при использовании простой переменной сама переменная, а при использовании переменной с индексом  ее индекс.

В зависимости от того, где осуществляется проверка условия продолжения или окончания цикла, существуют:

• цикл с предусловием – цикл начинается с проверки условия (рис. 1);

• цикл с постусловием – условие проверяется после выполнения тела цикла (рис. 2).

Рис.1. Рис. 2.