сервис вопросов и ответовВ одномерном массиве поменять местами минимальный и максимальный элементы. Все элементы большие 4 заменить числом 4. Посчитать количество таких элементов.
5-9 класс|
|
BackaSasha
17 окт. 2014 г., 11:28:12 (9 лет назад)
Elisyaeva
17 окт. 2014 г., 13:14:47 (9 лет назад)
const n=10;
var A : Array [1..10] of integer;
i, mini, maxi, min,max, c,k: integer;
begin
for i := 1 to n do
begin
A[i] := random(10);
write(' ',A[i]);
end;
maxi:=1;
mini:=1;
For i:=1 to n do
begin
min:=A[1];
If A[i]>max then
begin
max:=A[i];
maxi:=i;
end;
If A[i]<min then
begin
min:=A[i];
mini:=i;
end;
c:=A[maxi];
A[maxi]:=A[mini];
A[mini]:=c;
end;
Writeln;
for i:=1 to n do
begin
Write(' ',a[i]);
end;
Writeln;
for i:=1 to n do
begin
If a[i]>4 then
begin
a[i]:=4;
inc(k);
end;
Write(' ',a[i]);
end;
Writeln;
Write('Количество: ',k);
end.
Ответить
Другие вопросы из категории
Помогите пожалуйста, очень срочно надо!
Заполнить массив из 50 элементов случайным образом от 30-31 заменить все макс. элементы 0.
Читайте также
ПОМОГИТЕ ПОЖАЛУЙСТА
Дан массив размера N. Найти номера тех элементов массива которые больше своего левого соседа и количество таких элементов. Найденные номера выводить в порядке их убывания
Поменять местами минимальный и первый элементы массива.
В turbo pascal
Решите пожалуйста,в конструкторе
алгоритмов:
в одномерном массиве произвольных чисел требуется заменить числом 100 значения всех элементов, удовлетворяющих условию A[i]>=5
Пожалуйста помогите задачу умоляю))) Пожалуйста помогите задачу решить! размерность массива вводится с клавиатуры.
Элементы целочисленного массива - числа из [-30;70].
Есть ли среди чисел массива числа кратыне 7-и? Если да то сколько их?
Сколько элементов массива находятся на позициях,кратных 7-и. Напечатайте на экране и количество таких элементов и сами эти элементы.
Вы находитесь на странице вопроса "В одномерном массиве поменять местами минимальный и максимальный элементы. Все элементы большие 4 заменить числом 4. Посчитать количество таких элементов.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.