1. Дан одномерный массив, напечатать номера элементов, значения которых находятся в заданном диапазоне (a,b). 2. Дан массив из N элементов. Определить сумму тех, которые нечетны и отрицательны. 3. В одномерном массиве A(10) определить кол-во и произведение элементов, которые больше 5. 4. Дан массив из N элементов. Определить кол-во элементов, кратных 4. 5. В одномерном массиве A(10) найти наименьший элемент.
program zadacha3;vari,kolvo,proizv: integer;a: array [1..10] of integer; beginfor i:=1 to 10 do begin a[i]:=random(10); writeln(a[i]); end;kolvo:=0;proizv:=1;for i:=1 to 10 do beginif a[i]>5 then begin kolvo:=kolvo 1; proizv:=proizv*a[i]; end;end; writeln('kolvo chisel > 5 = ', kolvo);writeln('proiz chisel > 5 = ', proizv); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
