var a:array[1..10]of integer;
i,n1,n2:integer;
s:real;
begin
for i:=1 to 10 do begin
readln(a[i]);
s:=s+a[i];
end;
s:=s/10;
for i:=1 to 10 do begin
if a[i]>s then inc(n1);
if a[i]<s then inc(n2);
end;
writeln('bolshe - ',n1,' menshe - ',n2);
end.
В обычной кодировке 1 символ занимает 1 байт памяти
В Unicode 1 символ - 2 байта
Значит
17 символов × 1 байт = 17 байт
Смотри полученные данные и саму гистограмму в прикреплённых картинках.
4*1254 - 254 + 9 = 4771
4771 <span>в системе счисления с основанием 5 = 123041
следовательно 1
</span>
y := Sqr(Sin(Exp(1 / 3 * Ln(x)))) - Exp(0.4 * (1 + a));