Заменяет в строке
var
s : string;
i, lim : integer;
begin
readln (s);
i := 1;
lim := length (s);
while (i <= lim) do
begin
if s[i] in ['1'..'9'] then
begin
if (s[i] = '1') and (i <> length (s)) and (s[i+1] ='0') then
begin
write ('ten');
inc (i);
end
else
case s[i] of
'1' : write ('one');
'2' : write ('two');
'3' : write ('three');
'4' : write ('four');
'5' : write ('five');
'6' : write ('six');
'7' : write ('seven');
'8' : write ('eight');
'9' : write ('nine');
end;
end
else write (s[i]);
inc (i);
end;
end.<span>
</span>
Иуееиу,у меня так получилось,правильно?
еиу заменяем цифрами 012
нам надо найти слово которое стоит на 411 месте
на 411 месте должно быть 410 (т.к. первое число 000000)
410/3=136(2) в скобках остаток, на 3 т.к. 3 буквы
136/3=45(1)
45/3=15(0)
15/3=5(0)
5/3=1(2)
1/3=0(1) -> 120012 ->иуееиу
Ответ:
204 800 бит
Объяснение:
16×32=512строк
512×25=12 800 символов
12 800×16=204 800 бит
если я правильно понял , что тебе нужно то ответ правильный (надеюсь)
Их бывает 4 вида:
левое
правое
по середине
по ширине
выбери сам