Информатика при изготовлении детали измеряется её диаметр . если он меньше 4 и больше 5 то деталь небракованная .определите процент брака в партии из n деталей
Информатика при изготовлении детали измеряется её диаметр . если он меньше 4 и больше 5 то деталь небракованная .определите процент брака в партии из n деталей
Гость
Ответ(ы) на вопрос:
Гостьvar a,i,n,k:integer;
begin
readln(n);
for i:=1 to n do begin
read(a);
if (a<4) or (a>5) then k+=1;
end;
writeln(k/n*100:1:1);
end.
Не нашли ответ?
Похожие вопросы