Помогите пожалуйста. 1)Дано трехзначное число. определить верно ли, что оно заканчивается...

Question

Помогите пожалуйста.
1)Дано трехзначное число. определить верно ли, что оно заканчивается четной цифрой.
2)Дан одномерный массив. Заменить отрицательные элементы на противоположные по знаку.
3)Дан одномерный массив. определить минимальный элемент и его номер.

Answer 1

1) Не важно, какой оно длины. Если оно заканчивается чётной цифрой, то оно чётно, обратное тоже верно. Тупо проверяем число на чётность:

ЕСЛИ число ОСТАТОК 2 = 0 ТО Вывод.Цепь("Верно.") ИНАЧЕ Вывод.Цепь("Не верно.") КОН

2)
ПЕР массив: РЯД N ИЗ ЦЕЛ, сч: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО N - 1 ВЫП
  ЕСЛИ массив[сч] < 0 ТО массив[сч] := -массив[сч] КОН
КОН

3)
ПЕР массив: РЯД N ИЗ ЦЕЛ, сч, мин_зн, мин_ном: ЦЕЛ;
УКАЗ
мин_зн := массив[0]; мин_ном := 0;
ОТ сч := 1 ДО N - 1 ВЫП
  ЕСЛИ массив[сч] > мин_зн ТО мин_зн := массив[сч]; мин_ном := сч КОН
КОН