Pascal
var
a,s : integer;
begin
s := 0;
readln (a);
While a <> 0 do
begin
s := s +a;
readln (a);
end;
writeln (s);
end.
Var s: string;
<span>begin
</span><span> readln(s);
</span><span> writeln(s.ToWords.Sorted.JoinIntoString(' '));
</span><span>end.
</span>это строка для проверки
<span>для проверки строка это
</span>
А) (x1 + x2) / 2
b) k = k - 1
c) i = i + 1
d) z = x + y + z
Если алфавит на 64 символа, то один символ займет 6 бит
Общий объем текста 600 бит или 75 байт
Давайте применим сортировку пузырьком
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())