Выделить и сменить коротко
5 единиц
Пишешь в ответе так: 11111
//PacsalABC.Net
// (c) NaaMan
var
s : integer;
begin
write('Введите число (10-999): ');
readln(s);
writeln('В числе ', s, ' ', s.ToString.Length, ' знака');
write('Число ', s);
if s mod 3 = 0 then
write(' кратно')
else
write(' не кратно');
writeln(' трём')
end.
1,11,111,1111,11111,111111....
10,100,1000,10000,100000...
101,111,101,111,101,111,101...
Ответ:
243
Объяснение:
используются 0, 1, 2 - это система счисления по основанию 3
позиций 5: от 00000 до 22222
всего возможных чисел = 3 в степени 5 = 243