Информатика 9 класс очень Как будет выглядеть запись в программе паскаль. Надо решение полностью. Задание во вложениях

Маслинка174 Маслинка174    3   23.02.2020 11:56    0

Ответы
olenkadergunov olenkadergunov  11.10.2020 11:31

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.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика