10 * 2048 = 20480 символов
20480 * 8 = 163840 бит
1 байт = 8 бит
163840 / 8 = 20480 байт = 20 Кбайт
Вот :) Надеюсь, всё будет понятно.
VB.
Dim n As Integer
n = InputBox("Введите число:")<span>
MsgBox("В числе " & Len(CStr(n)) & " цифр.")
Pascal.
</span><span>Program N;
Var
I, S, N : Longint;
Begin
Writeln('Введите число'); Readln(I);
N:=1;
While I > 10 DO
BEGIN
I:=I DIV 10;
Inc(N);
end;
// c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535
Write('</span>"В числе цифр "<span> = ',N);
Readln; end.
</span>
<em>Помог? Жми <u>Лучший!</u></em>
#include <stdio.h>
int
main ()
{
int a, b, c, d=1;
scanf ("%d", &a);
scanf ("%d", &b);
scanf ("%d", &c);
if (b>a) {a=b;d=2;}
if (c>a) {a=c;d=3;}
printf("The largest entered number is number %d and is equal to %d", d, a);
return 0;
}