Информатика | 10 - 11 классы
В массиве из 15 чисел подсчитать сумму и количество положительных элементов.
Помогите, программа на языке паскаля.
Паскаль, ребятки?
Паскаль, ребятки?
Кто тут гений информатики?
Помогите, пожалуйста!
Написать программу и блок - схему Дан массив из 10 целых чисел, заполненный генератором случайных чисел.
Найти минимальный элемент в массиве и подсчитать количество таких элементов в массиве.
Найти сумму положительных и количество нечетных элементов массива А(10)?
Найти сумму положительных и количество нечетных элементов массива А(10).
Через паскаль , срочно пожалуйста !
Заменить все положительные элементы массива на максимальный элемент массива ?
Заменить все положительные элементы массива на максимальный элемент массива .
Напишите программу в ПАСКАЛЬ.
Найти средние арифметические положительных и отрицательных элементов массива Паскаль написать программу?
Найти средние арифметические положительных и отрицательных элементов массива Паскаль написать программу.
Составте программу позволяющую подсчитать в массиве число положительных и нулевых элементов?
Составте программу позволяющую подсчитать в массиве число положительных и нулевых элементов.
Найти средние арифметические положительных и отрицательных элементов массива, написать программу в паскале?
Найти средние арифметические положительных и отрицательных элементов массива, написать программу в паскале.
В массиве найти сумму и кол - во элементов между первым и последним положительными элементами?
В массиве найти сумму и кол - во элементов между первым и последним положительными элементами.
(паскаль).
Составить программу?
Составить программу!
На языке Паскаль
Подсчитать количество отрицательных чисел из 10 введенных с клавиатуры.
Найти количество чисел, не больше 100.
Найти сумму элементов одномерного массива с 7 целых чисел язык Паскаль?
Найти сумму элементов одномерного массива с 7 целых чисел язык Паскаль.
Помогите пожалуйста, срочно?
Помогите пожалуйста, срочно!
Подсчитать количество чётных элементов массива, заданного датчиком случайных чисел.
Паскаль.
На странице вопроса В массиве из 15 чисел подсчитать сумму и количество положительных элементов? из категории Информатика вы найдете ответ для уровня учащихся 10 - 11 классов. Если полученный ответ не устраивает и нужно расшить круг поиска, используйте удобную поисковую систему сайта. Можно также ознакомиться с похожими вопросами и ответами других пользователей в этой же категории или создать новый вопрос. Возможно, вам будет полезной информация, оставленная пользователями в комментариях, где можно обсудить тему с помощью обратной связи.
Var a : array[1.
15] of integer ; i, sum, count : integer ;
begin for i : = 1 to 15 do readln(a[i]) ; sum : = 0 ; count : = 0 ; for i : = 1 to 15 do if a[i] > 0 then begin sum : = sum + a[i] ; inc(count) ; end ; writeln(sum, ' ', count) ;
end.
Program n1 ;
var a : array [1.
15] of integer ;
S, k, i : integer ;
begin
for i : = 1 to 15 do readln(a[i]) ;
S : = 0 ;
k : = 1 ;
for i : = 1 to 15 do
begin
if(a[i]>0) then
begin
S : = S + a[i] ;
k : = k + 1 ;
end ;
end ;
writeln(k) ;
writeln(S) ;
end.