Var a: string;
i: integer;
begin
readln(a);
for i := 1 to length(a) do
if (a[i] = 'а') then a[i] := 'и';
writeln(a);
<span>end.</span>
Алфавит системы счисления будет иметь вид
0 1 2 3 4 5 6 7 8 9 A B C D E
следующие 30 чисел
10 11 12 13 14 15 16 17 18 19 1A 1B 1C 1D 1E 20 21 22 23 24 25 26 27 28 29 2A 2B 2C 2D 2E
38,1 * 1200 = 45720 (пикселей по ширине и высоте);
45720*45720= 2090318400 (точек в цветном изображение);
2090318400 * 32 = 66890188800 бит.
66890188800 бит. = 8361273600 байт. = 8165306,25 Кб. = 7973,931884765625 Мб.= 7,787042856216431 Гб.
Ответ: ~7,79 Гб.
Надеюсь, помог.
Буду признателен, если выберете "Лучший"
Удачи!)
(1046000+2576) ×8 = 1.048.576 Бит
1.048.576 Бит = 131072 Байт = 128 КБ.
Ответ: 1.048.576 Бит.
................................................................................................