Var
s:string;
b:char;
i,n:integer;
begin
writeln('Введите текст');
readln(s);
writeln('Введите символ');
readln(b);
n:=length(s);
for i:=1 to n do
if s[i]=' ' then
s[i]:=b;
writeln(S);
<span>end.</span>
Var a:array [1..10] of integer;
i,k1,k2:integer;
begin
for i:= 1 to 10 do
a[i]:= Random(20,100);
writeln(a);
for i:=1 to 10 do
if a[i] mod 2 = 0 then k1:=k1+1
else k2:=k2+1;
writeln('Чётных элементов: ',k1);
writeln('Нечётных элементов: ',k2)
end.
Дано:
N=8
x=800*600
V-?
Решение
N=2^i
8=2^i
i=3
x=800*600=480000бит
V=x*i=480000*3=1440000 бит
Чтобы найти число разрядов числа находишь логарифм по основанию 10 от данного числа, обрезаешь целую часть и прибавляешь единицу.
trunc(log10(a)+1)
У трёхзначных чисел это значение будет равно трём.
Дано:
i = 8 бит
k = 26 (это если не считать пробел, который должен быть после запятой. если с пробелом, то 27. p.s. ты так написала)
Найти:
I -?
Решение:
I = k • i
I = 26 • 8 бит
I = 26 • 2³ бит = 26 • 2³/2³ байт = 26 байт
Ответ: 26 байт ( или же 27, если записать предложение по всем правилам русского языка)