Есть ответ 👍

Заполнить массив случайными числами из промежутка (1-100) и определить в массиве a[1..20]кол-во однозначных чисел кратным 3.

272
496
Посмотреть ответы 2

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


Var i,k: integer; a: array[1..20] of integer; begin k: =0; for i: =1 to 20 do begin a[i]: =random(101); if (a[i] mod 3=0) and (a[i]< 10) then k: =k+1; end; writeln(k); end.

ответ:
20073600
Объяснение:
N=2^i
I=k*i
65536=2^i
i=16
I=1020*1230*16=20073600

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