Дана последовательность чисел а,...,аn (N<20). найти min(a2,a4,...) и max(a1,a3,...)
10-11 класс
|
program gt;
var n,max,min,i:integer;
a:array[1..1000]of integer;
begin
readln(n);
max:=-maxint;
min:=maxint;
for i:=1 to n do
begin
read(a[i]);
if(i mod 2=0)and(a[i]<min)then min:=a[i];
if(i mod 2=1)and(a[i]>max)then max:=a[i];
end;
writeln(min,' ',max);
end.
вот решение по проще
Другие вопросы из категории
2) составить программу для вычисления периметра треугольника.
ри этих условиях?
какой из знаков: конъюнкции или дизъюнкции, необходимо поставить вместо знака «?»,
чтобы логическое выражение (если это возможно) при любых значениях высказываний
А и В всегда принимала значение «истина».
Читайте также
Составьте алгоритм и программу нахождения суммы чисел этой последовательности
1, 2, 4, 7, 3, 4, 4 … , каждый элемент этой последовательности, начиная с
четвёртого равен последней цифре суммы трёх предыдущих элементов. Найдите
значение 1400-го элемента этой последовательности.
Ответ: ______________
2. В последовательности чисел сравнить, что больше сумма положительных или про-изведение отрицательных.
3. В последовательности чисел определить предпоследнее отрицательное число. (При решении введите дополнительную переменную для хранения предпоследнего отрицательного числа).
не более N
ненулевых целых чисел, последним числом в последовательности является
0. Ввести эту последовательность в одномерный массив и
вычислить хаpактеристики
.Найти порядковые номера и сумму двух наибольших элементов. ( в Паскаль )