Помогите пожалуйста!!! Как составить постановку, алгоритм и в PASCALe программу подсчитывающую количество положительных элементов массива W из 9 чисел.
10-11 класс
|
Значения элементов массива ввести с клавиатуры. Только можно поподробней)
var
W:Array[1..9] of Integer;
i,k:Integer;
Begin
for i:=1 to 9 do
Read(W[i]);
for i:=1 to 9 do
if (W[i]>0) then k:=k+1;
Writeln(k);
end.
Другие вопросы из категории
Читайте также
рассчитать по формуле tgG, где G номер элемента массива
мер в таблице.Произвести отладку и проверить работу программы для произвольно заданных элементов таблицы. ПОЖАЛУЙСТА ПОМОГИТЕ ХОТЬ ПРОГРАММУ СОСТАВИТЬ!!! СРОЧНО)
принимать значения от 0 до 1000.описать на русском или на одном из языков програмирования алгоритм,который находит и выводит среднее арифметическое всех элементов массива,имеющих нечетное значение
формуле WSinW, где W номер элемента массива
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали