Дан массив целых чисел от 0 до 20, заполненный случайными - вопрос №5501592020 от Alina12345611109 22.01.2023 00:44

Question

Информатика: Дан массив целых чисел от 0 до 20, заполненный случайными числами в интервале [0,100]. определить количество элементов массива кратных 3.

Alina12345611109 · Answer

Var x:array[1..100]; K,i:integer; Begin k:=0; For i:=1 to 100 do begin Read(x[i]); If (z[i] mod 3=0) then k:=k+1; end; Write(k); end....