Тема: Фундаментальні алгоритми на графах та деревах

Лекція №6

CASE x OF

1..5: S₁

2,3,8: S₂

4,6,9..13: S₃

ELSE

S₄

END;

П р и к л а д: Складемо програму, яка буде виконувати роль простого калькулятора, що виконує чотири арифметичні дії.

Program kalkulator;

Uses Crt;

Var a,b:Real;

s:Char;

Begin

Clrscr;

Writeln('Введіть перший операнд');

Readln(a);

Writeln('Введіть другий операнд');

Readln(a);

Writeln('Введіть знак операції');

Readln(s);

CASE s OF

“ + ”: Writeln('Результат', (a+b):5:2);

“ – “: Writeln('Результат', (a-b):5:2);

“ * ”: Writeln('Результат', (a*b):5:2);

“ / “: Writeln('Результат', (a / b):5:2);

Else

Writeln('Недопустима операція')

End;

End.

1. Основні властивості графів.

2. Пошук в глибину та ширину.

3. Коротші путі в графі.

Час: 2 год.

Дата добавления: 2014-01-07; Просмотров: 732; Нарушение авторских прав?; Мы поможем в написании вашей работы!