Ответ: 3
решение:
рассмотрим столбец б. Подставим и посчитаем числа.
получается соответственно: 12 (2*6); 6(5+1); 4(5-1). Из этого следует, что половина этой диаграммы будет равна 12 (т.к. самое большое число.) Из 12 вычетаем 6 и 4. 12-6-4=2
чтобы получилось 2, число 6 из таблицы нужно разделить на 3. Следовательно, ответ 3.
Var a: String;
sum,i: Integer;
begin
sum:=0;
writeln('Введите текст');
readln(a);
for i:=1 to Length(a) do
begin
if a[i]='а' then sum:=sum+1;
end;
writeln('Буква а встречается: ',sum,' раз(а)');
end.
1) var a: array[0..10] of integer; i, s: integer;
begin
for i := 1 to 10 do begin
a[i] := random(60);
write(a[i], ' ');
if a[i]<=20 then s:=s+a[i];
end;
writeln;
writeln(s);
<span>end.
2) </span>var a: array[0..10] of integer; i, s: integer;
begin for i := 1 to 10 do begin
a[i] := random(60);
write(a[i], ' ');
// if (i mod 2=1) then s:=s+a[i]; Раскоментируй, если сумму нужно искать среди нечетных номеров элементов.
// if (a[i] mod 2=1) then s:=s+a[i]; Раскоментируй, если сумму нужно искать среди самих нечетных элементов.
end;
writeln;
writeln(s);
end.