Есть ответ 👍

Создать массив из десяти целых чисел принадлежащие промежутку [0; 25). вывести полученный массив на экран. посчитать к- количество элементов массива, значение которых превышает 12

197
211
Посмотреть ответы 2

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

Magia33
4,6(71 оценок)

Var   a: array[1..10] of integer;     k,i: integer; begin  writeln('массив');   for i: =  1 to 10 do begin    a[i]: =random(25);     write(a[i],' ');     if a[i]> 12 then k: =k+1;   end;   writeln;   write('количество числе больших 12-ти = ',k); end.

На первом месте м.б. только 1 чтобы число было наименьшим после 1 пойдут нули (7 штук по условию) тогда получится 1 000 0000 если перед 1 поставить 0001  тогда 0001 0000 0001 1111 что в шестнадцатеричной будет 101f

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