Регистрация
cet6990
28.06.2020 12:50
Информатика
Есть ответ 👍

Определите закон,связывающий количество информации и количество возможных сообщений

290
399
Посмотреть ответы 1

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

233423
233423
4,7(81 оценок)

const

n=15;

var

a: array [1..n] of integer;

i,min: integer;

begin

randomize;

for i: =1 to n do begin

a[i]: =random(104)-37;

write (a[i],' ');

end;

writeln;

min: =a[1];

for i: =2 to n do

if (odd(a[i])=true) and (a[i]< min) then min: =a[i];

writeln (min);

readln;

end.

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