Составте программу формирования из массива А двух массивов, в которых первый замолнен отрицательными, а второй-положительными элементами.
10-11 класс
|
Program Pr1;
uses crt;
var mas:array[1..100] of integer;
pos:array[1..100] of integer;
min:array[1..100] of integer;
i,b,c:integer;
Begin
clrscr;
b:=0;
c:=0;
randomize;
for i:=1 to 100 do mas[i]:=-100+random(200);
for i:=1 to 100 do write(mas[i]);
writeln();
for i:=1 to 100 do if mas[i]>=0 then begin
b:=b+1;
pos[b]:=mas[i];
end
else begin
c:=c+1;
min[c]:=mas[i];
end;
writeln('Polojitelnye');
for i:=1 to b do write(pos[i]);
writeln();
writeln('Otricatylnye');
for i:=1 to c do write(min[i]);
end.
Другие вопросы из категории
в студенческой группе 24 студента. Сообщение о том что староста группы девушка , содержит 3 бита информации . количество девушек в группе равно
у := 3;
z := у*2;
у := х mod у;
х := х - z;
у := у + z;
Читайте также
массиве A[n] записаны оценки экзаменующихся , полученные на первом экзамене . Подсчитать , сколько человек не допущено ко второму экзамену .
Задача 2
В одномерном массиве , состоящем из n вещественных элементов , вычислить ;
1) минимальный элемент массива;
2)сумму элементов массива , расположенных между первым и последним положительными элементами .
Преобразовать массив таким образом , чтобы сначала располагать все элементы , равные нулю, а потом-все остальные .
индексов элементов главной диагонали.Выведите на экран исходный и измененный массивы (программа на языке Паскаля)
2)Составьте программу формирования и вывода на экран одномерного массива, состоящего из удвоенных минимальных элементов строк двумерного массива, заданного с помощью датчика случайных чисел
среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива
о том, что в массиве положительных элементов нет.
прошу вас решите!
Дано массивы А1(N1,M1), A2(N2,M2), A3(N3,M3). Сформировать одномерные массивы В1, В2, В3, каждый из которых состоит из 2-ух элементов. В первом из них количество положительных элементов массивов А1,А2,А3 соответственно, во втором количество отрицательных элементов массивов А1,А2,А3 соответственно. Определение количества отрицательных и положительных элементов в исходном массиве и формирование одномерного массива осуществить в подпрограмме.