Презентация: Pascal ABC.Net. Оператор выборки CASE.

Алгоритмы ветвления

Оператор выбора CASE

Общая блок-схема

начало

действие

селектор

действие

действие

конец

Задача.

Блок-схема:

• По введенному пользователю номеру дня недели вывести название дня

Синтаксис оператора “CASE”

Case of

: ;

: begin;

; end;

. . .

: ;

else ;

End;

Текст программы

var day:integer;

begin

writeln('Введите номер дня недели'); readln(day);

case day of

1: writeln('Понедельник');

2: writeln('Вторник');

3: writeln('Среда');

4: writeln('Четверг');

5: writeln('Пятница');

6: writeln('Суббота');

7: writeln('Воскресенье');

else writeln('Нет такого дня');

end;

End.

Задачи:

На «3»: с доски;

На «4»: Пользователь вводит номер месяца. Определить время года.

На «5»: Оператором case написать калькулятор. 1 – сложение, 2 – вычитание, 3 – умножение, 4 – деление, 5 – квадрат, 6 – корень.