1. 1)2
2)0
3)0
4)12
5) 0
6)3
2. 21; 15; 45
0 раздели на 2.Чему будет равно?
А div - просто убирает остаток.
Например 10 div 3 будет 3,33, а компилятор тебе покажет просто 3.
Var a: array [1..20] of integer; i, s: integer;
begin
randomize;
s := 0;
for i := 1 to 20 do
a[i] := random(40) - 10;
for i := 1 to 20 do
begin
write(a[i], ' ');
if (a[i] + 10) mod 2 = 1
then
s := s + 1;
end;
writeln();
writeln(s);
<span>end.</span>
Вот держи мне поставил четыре