Найти количество отрицательных элементов в массиве из 14 чисел выбранных случайным образом в диапазоне от - 13 до 13
Найти количество отрицательных элементов в массиве из 14 чисел выбранных случайным образом в диапазоне от - 13 до 13
Гость
Ответ(ы) на вопрос:
Гостьprogram chik;
var a,k,i:integer;
begin
k:=0;
for i:=1 to 14 do
begin
a:=trunc((13-(-13))*random-13);
if(a<0)then k:=k+1;
end;
writeln(k);
end.
Не нашли ответ?
Похожие вопросы