определите назначение программы:
program Hello;
const N=10;
var A: array[1..N] of integer;
I: integer; S:real;
begin
for I:=1 to N do read(A[i]);
S:=0;
for I:=1 to N do
if A[i] mod 2=0 then S:=S+1;
S:=S*100/N;
writeln(S)
end.
jjfgfhkkhtugf:
Помогите пожалуйста
Ответы
Ответ дал:
0
Ответ:
Считает в процентах количество введённых чётных чисел от общего числа.
Объяснение:
Программа заполняет массив вводом с клавиатуры.
Массив 10 целых чисел (N – задано как константа)
Перебором вычисляет делится ли элемент массива на 2 без остатка
Если да, то увеличивает счётчик
Выводит процент чётных (делятся на 2) чисел от количества элементов массива.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад