var n,count:integer;
begin
repeat
readln(n);
if(n<>999) then inc(count);
until(n=999);
writeln(count);
readln;
end.
Давайте применим сортировку пузырьком
def bubble_sort():
new_list = list(map(int, input('Введите числа через пробел: ').split(' ')))
for i in range(len(new_list) - 1):
for j in range(len(new_list) - i - 1):
if new_list[j] > new_list[j + 1]:
new_list[j], new_list[j + 1] = new_list[j + 1], new_list[j]
return new_list
print(bubble_sort())
1.
<span>var a,b,i,k:integer;
begin
readln(a,b);
k:=0;
for i:=a to b do
if i mod 2=0 then k:=k+1;
writeln('k = ',k);
end<span>.
Пример:
5 20
k = 8
2.
var a,b,c:integer;
begin
readln(a,b);
c:=a;
a:=b;
b:=c;
writeln(a,' ',b);
end.
Пример:
5 20
20 5</span></span>
16 символов. 16=2⁴; 4 бита одна буква.
"ДВАЖДЫ ДВА - ЧЕТЫРЕ"
6букв, пробел, 3 буквы, пробел, тире, пробел, 6 букв.
6+1+3+1+1+1+6=19*4бита=76 бит
Другие варианты для понимания:
"ДВАЖДЫ*ДВА=ЧЕТЫРЕ"
17*4бита=68 бит
"2*2=4"
5*4=20 бит