Информатика 9 класс сделать нужно через программу - вопрос №101145119 от Nastya32q 29.02.2020 08:17

Question

Информатика: Информатика 9 класс сделать нужно через программу паскаль пригодность детали оценивается по размеру в, который должен соответствовать интервалу (a-±8). определить, имеются ли в партии из n деталей бракованные. если да , то подсчитать их количество. иначе выдать отрицательный ответ.

Nastya32q · Answer

var  n, i, k: integer;  a, b: real;begin  read(n, a);  k := 0;  for i := 1 to n do  begin    read(b);    if (b a - 8) or (b a + 8) then      k := k + 1;  end;  if k 0 then    write(k)  else    write( нет );end....