Пример 2. Цель работы: Изучение базовой алгоритмической конструкции «ветвление»

ПРОГРАММИРОВАНИЕ АЛГОРИТМОВ ЛИНЕЙНОЙ СТРУКТУРЫ

Цель работы: Изучение базовой алгоритмической конструкции «ветвление». Изучение структуры логических операций. Изучение операторов условного перехода (IF…THEN…ELSE…), выбора (CASE), безусловного перехода (GOTO).

Вариант №2

Пример 2.

Постановка задачи: Написать программу для расчета двух чисел n,m. Если оба значения кратны трем, то большее из них заменить их суммой, в противном случае разностью.

Таблица внешних спецификаций:

	Имя переменной	Назначение переменной	Тип переменной	Единицы измерения
Входные данные	n m	вводимое число вводимое число	integer integer	-
Выходные данные	n m	число число	integer integer	-

Расчет контрольных примеров:

При n=3, m=9. (остаток равен 0); (остаток равен 0);

3>9 (нет) => m=9+3=12; n=3;

При n=5, m=10. (остаток не равен 0); (остаток не равен 0);

5>10(нет) => m=10-5=5; n=5;

Блок-схема:

Программная реализация:

program chisla;

uses

crt;

var

n,m: integer;

begin

clrscr;

writeln('Введите n');

write('n=');

readln(n);

writeln('Введите m');

write('m=');

readln(m);

if (n mod 3=0) and (m mod 3=0)

then

if n>m then n:=n+m else m:=m+n

else

if n>m then n:=n-m else m:=m-n;

writeln(‘Результат вычисления: ‘,’n=’,n,’, ‘,’m=’,m);

readln;

end.

Протокол выполнения программы:

1) в процессе диалога с пользователем вводим значения n=3, m=9;

2) условие (n mod 3)=0 и (m mod 3)=0 выполняется переходим к шагу 2.1

2.1) условие n>m не выполняется переходи к шагу 2.2

2.2) вычисление m=n+m

3) печать ‘n=3’

4) печать ‘m=12’

1) в процессе диалога с пользователем вводим значения n=5, m=10;

2) условие (n mod 3)=0 и (m mod 3)=0 не выполняется переходим к шагу 2.1

2.1.) условие n>m не выполняется переходим к шагу 2.2

2.2) вычисление m=m-n

3) печать ‘n=5’

3) печать ‘m=5’