Var a:array[1..10] of integer;
i,k:integer;
begin
for i:=1 to 10 do begin
a[i]:=random(26);
writeln(a[i]);
if a[i] > 12 then k := k + 1;
end;
writeln('Элементов массива превышающих 12: ',k);
end.
В диапазоне C5:E5 3 ячейки
Их сумма = 8*3=24
В диапазоне F5:G5 2 ячейки
Их сумма = 6*2=12
Общая сумма = 12+24=36
Круги Эйлера - во вложении.
a+b+c+d+e = 450.
b+c+d+e= 260.
b+d = 50.
2. 3. 8. Потому что например: boo?.TMP tmp это расширение без него никак
Это будет гистограмма, вроде как.