Напишите программу в паскале котороя находит из двух чисел четное

226

255

Посмотреть ответы 2

Ответы на вопрос:

sangria

Информатика

4,6(82 оценок)

// pascalabc.net 3.3, сборка 1576 от 16.11.2017 // внимание! если программа не работает, обновите версию! begin var (a,b): =readinteger2; if a.iseven then writeln(a,' - четное') else writeln(b,' - четное') end. примеры 3 18 18 - четное 10 7 10 - четное 7 9 9 - четное - это неверно, нарушено условие (нет четных) 6 12 6 - четное - это верно, хоть условие и нарушено (оба четных)

frizikxx

Информатика

4,5(24 оценок)

a = 3, b = 1, c = 2

if a > b (3 > 1): M = a (M = 3, условие сработало - эту ветку выполняем)

else: M = b (условие сработало - эту ветку пропускаем)

if c > b (2 > 1): M = c (M = 2, условие сработало - эту ветку выполняем)

else: M = b (условие сработало - эту ветку пропускаем)

M = 2

if c > M: M = c

a = 3, b = 1, c = 2

if a > b (3 > 1): M = a (M = 3)

else: M = b (условие сработало - эту ветку пропускаем)

if c > M (2 > 3): M = c (условие НЕ сработало - эту ветку пропускаем)

M = 3

Объяснение:

В первой программе сначала сравнивают первое и второе число и переменной М присваивают значение большего из них. Затем сравнивают второе и третье число и переменной М присваивают значение большего из них. Если первое и третье число больше второго числа, то программа выдаёт неверный результат.

Во второй программе сначала сравнивают первое и второе число и переменной М присваивают значение большего из них. Затем сравнивают третье число и переменную М и переменной М присваивают значение третьего числа, если оно больше. Программа выдаёт верный результат.