сервис вопросов и ответовПомогите составить программу!:)В массиве из 10 целых чисел заменить все отрицательные элементы на минимальный элемент, а все положительные – на максимальны
10-11 класс|
|
й.
Karo666
23 окт. 2013 г., 1:26:18 (10 лет назад)
Sl1vA
23 окт. 2013 г., 2:29:09 (10 лет назад)
На паскаль:
var
a: array [1..10] of integer;
max, min, i: integer;
begin
for i := 1 to 10 do
read(a[i]);
max:=-maxint;
min:= maxint;
for i:= 1 to 10 do
if (a[i]>max) then max:=a[i];
for i := 1 to 10 do
if (a[i]<min) then min := a[i];
for i := 1 to 10 do
if (a[i]<0) then a[i] := min else if (a[i]>0) then a[i]:=max;
for i := 1 to 10 do
write(a[i],' ');
readln;
readln;
end.
Ответить
Другие вопросы из категории
1 задание. В саду 100(x) фруктовых деревьев, из которых 33(x) – яблони, 22(x) – груши, 16(x) – сливы, 17(x) - вишни. Чему равно основание системы
счисления (x).
2 задание. В системе счисления с некоторым основанием десятичное число 12 записывается как 110. Найдите это основание.
Читайте также
Составить программу на языке Паскаль: 1)Для массива K из 12 вещественных чисел определить сколько элементов массива меньше 0. 2)В массиве М из 10 целых
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
1. Написать программу, которая выводит на экран сумму средних арифметических значений двух вещественных массивов из 10 элементов.
2. Написать прогрумму,которая выводит на экран, разность значений двух вещественных массивов из 10 элементов.
Помогите решить люди).
Подсчитайте количество нулевых элементов в массиве из 10 целых чисел и распечатайте исходный массив в обратном порядке.
В паскале.В массиве из 10 целых чисел определить, сколько значений
превышает число 3.
Вы находитесь на странице вопроса "Помогите составить программу!:)В массиве из 10 целых чисел заменить все отрицательные элементы на минимальный элемент, а все положительные – на максимальны", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.