<span>0.125
влывлыаываыварпарпапрапр</span>
var B:array [1..1000] of real;
c:integer;d:real;
begin
writeln('Vvedite N=');read(a);
d:=0;
for c:=1 to n do
if(c mod 2= 0) then d:=d+b[c];
b[n]:=d;writeln(b[n]);readln;readln;
end;
1 символ кодируется 7 битами(2^7=128).
Теперь находим сколько бит всего
2000*7=14000 бит или 1750 байт.
Var
x,y: integer;
v: integer;
begin
write('Введите x,y: ');
readln(x,y);
if x>y then
begin
v := x;
x := y;
y := v
end;
writeln('Результат упорядочения по возрастанию: ',x,' ',y);
end.
Ответ:
да, нужно сменить номер телефона.
Объяснение:
ибо написать электронную почту поддержку WhatsApp