Программирование

Цели урока: составить программу, использующую штрих-код; найти способ решения в языке программирования Паскаль

Ветвление неполное полное Условие Действие 1Действие 2 Нет Да Условие Действие Нет Да

Тема урока Оператор «ветвление»

Ветвление неполное полное If then Условие Действие Нет Да Условие Действие 1Действие 2 Нет Да If then Else

Пример: Найти наибольшее из 2 х чисел и вывести на экран. Program Maximum; Var a,b:real; Begin Writeln(Введите числа a,b); Readln(a,b); If a>b then writeln(Максимальное число -,a); If a<b then writeln(Максимальное число -,b); End.

Выполнение программы: Введите числа a,b 7 8 Максимальное число – 8 Тест 1 Тест 2 Введите числа a,b 5 -2 Максимальное число – 5

Примерная программа: Program Pokupka; Var a:real; Begin Writeln(Введите 10 тизначный код товара); Readln(a); If a= then writeln(DVD-диск, цена: 300); If a= then writeln(Общая тетрадь, цена: 30); If a= then writeln(Учебник по информатике, цена: 250); If a= then writeln(Монитор, цена: 7500); If a= then writeln(Ноутбук, цена: 45250); End.