Предмет: Информатика,
автор: mashukova98
Помогите решить пожалуйста
Задача по теории вероятности
Обработка одномерных и двумерных массивов
СФОРМИРОВАТЬ ОДНОМЕРНЫЙ ЧИСЛОВОЙ МАССИВ А из 6 элементов и вывести результат резкльтат на экран. подсчитать количество элементов массива значение которых равны нулю и вынесите результат на экран с пояснениями.
Ответы
Автор ответа:
0
Var m : array[1..6] of Integer;
i,k : Byte;
Begin
k:=0;
For i:=1 to 6 do
Begin
m[i]:=Random(2);
Write(m[i],' ');
If m[i]=0 then Inc(k);
end;
Writeln;
Writeln(k);
end.
i,k : Byte;
Begin
k:=0;
For i:=1 to 6 do
Begin
m[i]:=Random(2);
Write(m[i],' ');
If m[i]=0 then Inc(k);
end;
Writeln;
Writeln(k);
end.
Автор ответа:
0
а блок схему сможешь?
Автор ответа:
0
FCEditor тебе в помощь
Похожие вопросы
Предмет: Биология,
автор: Sakura22Ogami
Предмет: Қазақ тiлi,
автор: polina25816
Предмет: Математика,
автор: maxkosenko04
Предмет: Алгебра,
автор: 12FOX12
Предмет: Химия,
автор: taliysha