составьте программу которая заполняет массив а [1..10]случайными целыми числами в диапазоне от 1 да 22 и преобразовывает его увеличивая все элементы с четными значениями на 1 а с нечетными уменьшая на 1
Ответы на вопрос
Ответил Аноним
0
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Матем ИЗ "...ОтделыЧисла";
ПЕР
a: РЯД 10 ИЗ ЦЕЛ;
сч: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(a) - 1 ВЫП
a[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 21)) + 1
КОН;
ОТ сч := 0 ДО РАЗМЕР(a) - 1 ВЫП
ЕСЛИ ЧЕТ(a[сч]) ТО УВЕЛИЧИТЬ(a[сч])
ИНАЧЕ УМЕНЬШИТЬ(a[сч]) КОН
КОН
КОН Задание.
ИСПОЛЬЗУЕТ Матем ИЗ "...ОтделыЧисла";
ПЕР
a: РЯД 10 ИЗ ЦЕЛ;
сч: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(a) - 1 ВЫП
a[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 21)) + 1
КОН;
ОТ сч := 0 ДО РАЗМЕР(a) - 1 ВЫП
ЕСЛИ ЧЕТ(a[сч]) ТО УВЕЛИЧИТЬ(a[сч])
ИНАЧЕ УМЕНЬШИТЬ(a[сч]) КОН
КОН
КОН Задание.
Новые вопросы