Преобразуем выражение к виду, из которого легко перевести в шестеричную систему, затем переведём в неё и посчитаем, сколько получится:
Как видим, была разность двух чисел в шестеричной системе счисления.
Первое число состояло из двух единиц и кучи нулей.
Вторая единица- после неё было 24 нуля (т.к.
в шестеричной системе и есть единица с 24-мя нулями).
Потом мы вычли из этого единицу с одним нулём.
Получается, у нас из этих 24-ёх нулей, последний останется, а вместо остальных 23-ёх будут стоять пятёрки. Ну, а вместо второй единицы будет ноль.
Итого, в этой записи будет 23 пятёрки.
Program task_1;
var
A, B, C : integer;
begin
read(A);
B := A;
C := 0;
While B <> 0 do
begin
C := C*10 + B mod 10;
B := B div 10
end;
If A=C then
begin
writeln('Число симметрично')
end
else
begin
writeln('Число НЕ симметрично')
end;
end.
Автор рассказа - Виктор Юзефович Драгунский (1913 - 1972), название рассказа - "Когда я был маленьким".
Главный герой рассказа в детстве плохо пережёвывал пищу и, чтобы поддержать мальчика, во время еды его мама рассказывала сказки. Одной из таких сказок была "Красная Шапочка". Во время рассказа мама напоминала ребёнку хорошенько жевать. После завершения сказки, когда по сюжету охотники разрезали брюхо волку и из него вылезли невредимыми Красная Шапочка и её бабушка, малыш заметил: "<span>Не прожевал, значит, волк-то!" - что противоречило маминым призывам пережёвывать и поэтому звучало особенно забавно.</span>
Program Summa;
Uses Crt;
var i,s:integer;
begin
clrscr;
i:=10;s:=0;
write('Двухзначные числа кратные 5: ');
while(i<=50) do
begin
write(i,' ');
s:=s+i;
i:=i+5;
end;
writeln;
writeln('Сумма 10 двухзначных чисел кратных 5: ',s);
readkey;
end.