сервис вопросов и ответовНайти максимальный из элементов, имеющих четный индекс. Пример: массив 7 2 6 5 4 4 10 3 9 элементы с четными индексами 2 5 4 3 максимальный из них 5.
10-11 класс|
|
Паскаль АВС.
Mamukas
07 марта 2015 г., 20:40:15 (9 лет назад)
Tatyanalyuchev
07 марта 2015 г., 22:14:18 (9 лет назад)
const
n = 15;
var
x: array[1..n] of integer;
i, max: integer;
begin
Randomize;
Write('Элементы массива: ');
for i := 1 to n do
begin
x[i] := Random(20);
Write(x[i]:3)
end;
max := x[2]; i := 4;
while i <= n do
begin
if max < x[i] then max := x[i];
i := i + 2
end;
Writeln;
Writeln('Max=', max)
end.
Тестовое решение:
Элементы массива: 17 12 18 12 11 14 18 19 16 16 9 13 7 3 13
Max=19
Ответить
Другие вопросы из категории
число -31 перевести в двоичную систему счисления
варианты ответов
А) 010001
В) 101100
С) 011111
Д) 010100
Е) 000100
второй вопрос
какой из ответов не правильный
А) 2 011010 -26внизу основание 10
В) 2 011100 -28 10
С) 2 010001 -17 10
Д) 2 011101 -29 10
Е) 2 111001 -59 10
В кодировке ASCII десятичный код строчной латинской буквы на 32 больше кода соответствующей прописной. Буква "А" имеет десятичный код 65. Укажите
шестнадцатиричный код слова Byte
ЛЮДИ, ПОМОГИТЕ, ПОЖАЛУЙСТА Сформировать одномерный массив из 20 элементов (значения элементов задаются случайным образом). Вывести массива на
экран. Найти среднее арифметическое элементов первой половины массива и сумму элементов второй половины массива.
паскаль массивы
Читайте также
Visual Basic
Написать процедуру для нахождения отрицательных и положительных чисел из строки, состоящий из произвольного набора цифр и букв.
*перевести полученное число в его двоичный код
*найти максимальное из чисел
Решение есть.нужно его объяснить.Опишите на русском языке или на одном из языков программирования алгоритм вычисления разности максимального среди
элементов, имеющих четные значения, и максимального среди элементов имеющих нечетные значения, в заданном целочисленном массиве из 30 положительных элементов.Cоnst N = 30; Var a: array [1..N] of integer; MaxEv, MaxOdd, I: integer; begin for i=1 to N readln(a); MaxEv :=0; MaxOdd :=0; For I :=1 to N do if (a div 2)*2 = a then begin if a >= MaxEv then MaxEv :=a; end else if a >= MaxOdd then MaxOdd :=a; Writeln (MaxEv - MaxOdd); end.
Вы находитесь на странице вопроса "Найти максимальный из элементов, имеющих четный индекс. Пример: массив 7 2 6 5 4 4 10 3 9 элементы с четными индексами 2 5 4 3 максимальный из них 5.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.