Регистрация
zenix122
31.01.2021 05:08
Информатика
Есть ответ 👍

решить задания на Python
Буду благодарен

202
468
Посмотреть ответы 1

Ответы на вопрос:

Кей121
Кей121
4,4(99 оценок)
//pascal abc.net 3.1 сборка 1219 const   n=10; var   c,i,k: integer;   ar: array[1..n] of integer;   r: real; begin   readln(c);   writeln('array: ');   for i: =1 to n do   begin     ar[i]: =random(-43,34);     if ar[i]> c then       begin       inc(k);       r: =r+ar[i];     end;     write(ar[i]: 4);   end;   writeln;   r: =r/k;   write(r); end. пример ввода: 0 пример вывода: array:   20 -23   23   18 -40 -16 -39   31 -12   21 22.6

Популярно: Информатика