ответ:max := -1001;for j := 1 to N doif (abs(a[j]) mod 10 <> 3) and (a[j]<0) thenif a[j]>max then max := a[j];if max=-1001 then write('Не найдено') else write(max);Объяснение:max := -1001;
Присваиваем переменной max, которая должна содержать максимальное значение, минимальное значение -1 ( -1000 -1 = -1001).
for j := 1 to N doif (a[j] mod 10 <> 3) and (a[j]<0) thenif a[j]>max then max := a[j];
Пробегаемся по элементам массива и смотрим: если остаток модуля элемента от деления на 10 неравен 3 (т.е. не оканчивается цифрой 3) и элемент меньше 0 (т.е. отрицательный), тогда, при условии, что элемент больше текущего максимального значения, переменную max перезаписываем -- присваиваем ей текущий элемент.
if max=-1001 then write('Не найдено') else write(max);
Если переменная max содержит изначальное значение (-1001), то выводим на экран "Не найдено", иначе выводим на экран max.
0
Объяснение:
Порядок действий:
Скобки;Отрицание;Конъюнкция (И) умножение;Дизъюнкция (ИЛИ) сложение.((1 ˄ ¬1) ˅ 0) ˄ (0 ˅ ¬1)
Возьмём скобку ((1 ˄ ¬1) ˅ 0)
В ней есть скобка (1 ˄ ¬1)
¬1 = 0 (по таблице в прикрепленных скриншотах)
⇒ (1 ˄ ¬1) = (1 ˄ 0) = 0 (по таблице в прикрепленных скриншотах)
((1 ˄ ¬1) ˅ 0) = 0 ˅ 0 = 0 (по таблице в прикрепленных скриншотах)
Берём скобку (0 ˅ ¬1)
¬1 = 0 (по таблице в прикрепленных скриншотах)
0 ˅ 0 = 0 (по таблице в прикрепленных скриншотах)
((1 ˄ ¬1) ˅ 0) ˄ (0 ˅ ¬1) = 0 ˄ 0 = 0
Присваиваем переменной max, которая должна содержать максимальное значение, минимальное значение -1 ( -1000 -1 = -1001).
for j := 1 to N doif (a[j] mod 10 <> 3) and (a[j]<0) thenif a[j]>max then max := a[j];Пробегаемся по элементам массива и смотрим: если остаток модуля элемента от деления на 10 неравен 3 (т.е. не оканчивается цифрой 3) и элемент меньше 0 (т.е. отрицательный), тогда, при условии, что элемент больше текущего максимального значения, переменную max перезаписываем -- присваиваем ей текущий элемент.
if max=-1001 then write('Не найдено') else write(max);Если переменная max содержит изначальное значение (-1001), то выводим на экран "Не найдено", иначе выводим на экран max.
Пример работы: