В одномерном массиве А , состоящий из N действительных элементов , вычислить :
10-11 класс
|
a ) сумму отрицательных элементов массива ;
b ) количество элементов , удовлетворяющих условию 7 Pascal
const n=10;
var a:array[1..n] of real;
i,k:integer;
s:real;
begin
s:=0; k:=0;
for i:=1 to n do
begin
readln(a[i]);
if a[i]<0 then s:=s+a[i];
if (a[i]<5) and (a[i]>-7) then inc(k);
end;
writeln(s,' ',k);
end.
количество элементов , удовлетворяющих условию -7< i
b)количество элементов , удовлетворяющих условию
-7<a, i a,<5
Другие вопросы из категории
блок-схемы. Составьте программу вычисления значения выражения при заданных x и y:
( |x|-|y| ) / ( 1+|xy| )
есть его основная ошибка.
Читайте также
Составить схему алгоритма и программу на языке программированияBasic для решения задачи по обработке одномерного массива.
положитльных элементов.
2.
Сформируйте одномерный массив из 5 элементов (значения элементов укажт пользователь с клавиатуры). Обнулите значения всех элементов с нечетными индексами. Выведите значения одномерного массива в строку через пробел.
1) Сумму модулей элементов массива, больших числа X
2)Сумму модулей элементов массива, меньших числа X
В одномерном массиве, состоящем из п вещественных элементов, вычислить:
массив.Найти сумму определённого элемента;количество элементов,стоящих на нечетных местах;произведение элементов,кратных 5.