сервис вопросов и ответовв одномерном массиве X(15) найти минимальный из положительных элементов и количество нулевых
10-11 класс|
|
Leva093
17 янв. 2014 г., 11:28:31 (10 лет назад)
Yulyaerohina
17 янв. 2014 г., 14:05:50 (10 лет назад)
Var
x : array [1..15] of integer;
i : integer;
min : integer;
Kol_nol : integer;
begin
Kol_nol := 0;
for i:=1 to 15 do
begin
Write ("Введите элемент массива:");
Readln(x[i]);
end;
min := x[1];
for i := 0 to 15 do
begin
if (x[i] > 0) then
begin
if (x[i] < min) then
begin
min := x[i];
end;
end;
if (x[i] = 0) then
begin
Inc(kol_nol);
end;
Writeln(min);
Writeln(kol_nol);
end;
DarushOK
17 янв. 2014 г., 16:04:00 (10 лет назад)
var
x:array[1..15]of integer;
i,min,z:integer;
begin
min:=32000;
z:=0;
for i:=1 to 15 do
begin
readln(x[i]);
if x[i]>0 then if x[i]<min then min:=x[i];
if x[i]=0 then inc(z);
end;
writeln(min);
writeln(z);
end.
Ответить
Другие вопросы из категории
Написать программу вычисления расстояния между населенными пунктами, изображенными на карте. Ниже представлен рекомендуемый вид экрана во время
работы программы (данные, введенные пользователем, выделены полужирным шрифтом).
Даны действительные числа а, b, с. Удвоить эти числа, если а ≥ b
≥ с, и заменить их абсолютными
значениями, если это не так.
Читайте также
в одномерном массиве X(15) найти минимальный из положительных элементов и количество нулевых. на C++
1.В произвольно заданном одномерном массиве ( случайные значения из отрезка -6 до 11 ) из 6 элементов, определить количество отрицательных, нулевых и
положитльных элементов.
2.
Сформируйте одномерный массив из 5 элементов (значения элементов укажт пользователь с клавиатуры). Обнулите значения всех элементов с нечетными индексами. Выведите значения одномерного массива в строку через пробел.
1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
Ребят, помогите! Тема: одномерные массивы. Две задачи:1) Написать прог
Ребят, помогите! Тема: одномерные массивы. Две задачи:
1) Написать программу, которая из заданного одномерного массива размерности N находит сумму только тех элементов, значения которых больше некоторого значения S.
S=5; Массив: 0,4 5,6 -2 10,1
2) При поступлении в ВУЗ абитуриенты, получившие "Двойку" на первом экзамене, ко второму не допускаются. В массиве A[N] записаны оценки экзаменующихся, полученных на первом экзамене. Подсчитать, сколько человек не допущено ко второму экзамену!
Заранее благодарю!
дан массив из семи элементов написать программу подсчитывающую
среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива
Вы находитесь на странице вопроса "в одномерном массиве X(15) найти минимальный из положительных элементов и количество нулевых", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.