Задача №16 по информатике (8 класс, Босова Л.Л.)

Составьте программу, вводящую бгие, если высказывание является истинным, и Еа1зе в противном случае: а) сумма цифр трёхзначного числа х является чётным чис- лом; б) треугольник со сторонами а, Б, с является разносторон- ним. ° $ 3.4 Программирование разветвляющихся алгоритмов Ключевые слова: е условный оператор неполный условный оператор ® составной оператор ® вложенные ветвления 3.4.1. Условный оператор При записи на языке Паскаль разветвляющихся алгоритмов используют условный оператор. Его общий вид: 1Ё <условие> ЕБеп <оператор_ 1> е1зе <оператор_ 2> Для записи неполных ветвлений используется неполная форма условного оператора: 1Е <условие> ЖБеп <оператор> Слова 1Е — ©Беп — е15е переводятся с английского языка на русский как если — то — иначе, что полностью соответствует записи ветвления на Школьном алгоритмическом языке. Перед е1зе знак ‹;» не ставится. В качестве условий используются логические выражения: ® простые — записанные с помощью операций отношения; ® составные — записанные с помощью логических операций. Пример 1. Запишем на языке Паскаль рассмотренный в . п. 2.4.2 (пример 8) алгоритм определения принадлежности точ- ки х отрезку [а, 5]. О В Глава З. Начала программирования ргодкам п_9; маг х, а, ЪЬ: геа1; Бед1п мк1бе1п ('Определение принадлежности точки отрезку'); мк16е ('Введите а, 5>>'); хеай1п (а, №); мк15ке ('Введите х>>'); теай1п (х); 1Ё (х>=а) ап@ (х<=5) ЕБеп мт1ке1п ('Точка принадлежит отрезку') е1зе иг1бе1п ('Точка не принадлежит отрезку') епа. Пример _ 2. Воспользуемся неполным условным оператором для записи на языке Паскаль рассмотренного в п. 2.4.2 (пример 9) алгоритма присваивания переменной у значения наибольшей из трёх величин а, В и с. ркодташ п_10; мак у, а, Ь, с: 1пГедег; Бед1п мк1бе1п ('Нахождение наибольшей из трёх величин'); мт15е ('Введите а, , с>>'); хеаа1п (а, №, с); у:=а; 1Е (5>у) ЖБеп у:=Ъ 1Ё (с>у) ©Беп у:=с ; 7 мкубе)п ('у=', у) епа. 0 Дополните эту программу так, чтобы её выполнение приводило к присваива