Клиент оформил вклад на m тысяч рубл. в банке под k% годовых. Через сколько лет сумма вклада превысит 5000 рубл., если за это время клиент не будет брать деньги со счёта. Составить алгоритм для этой задачи
Программа Вот: Program z1;Var a,b,c,d,k:integer;BeginWriteln('Введите трехзначное число');REadln(a);While a<>0 do beginWriteln('Введите трехзначное число');REadln(a);b:=a div 100 mod 10;c:=a div 10 mod 10;d:=a mod 10;if b+c+d div 10 >0 then writeln('Сумма цифр- двузначное число') else writeln ('Нет, сумма цифр не двузначное число');if b*C*D div 100 >0 then writeln('Произведение цифр- терхзначное число') else writeln ('Нет, произведение цифр не трехзначное число число');Writeln ('Введите любое число');Readln (k);If b*c*d>k then writeln('Произведение цифр больше числа') else writeln('Произведение меньше числа');if B+c+d div 5 =0 then writeln('Сумма цифр числа кратна 5') else writeln ('Сумма цифр не кратна 5');if B+c+d div k =0 then writeln('Сумма цифр числа кратна числу, введенному с клавиатуры') else writeln ('Сумма цифр не кратна числу, введенному с клавиатуры');End;End. Есть маленькая проблема в начале, не помню как прописывать, поэтому число первый раз нужно вводить 2 раза, если не устраевает, можете воспользоваться другими ресурсами
2))v=1/512Мбайт=1/512*1024*1024*8бит=16384бит
i=16384/4096бит=4бит
N=2^4=16cимволов
ответ:16символов
3)N - мощность алфавитаI - информационный объем сообщенияi - информационный объем одного символа N=2^i Найдем i:1/16 кб = 2^13/2^4 бит = 2^9 бит i=2^9/(256*2)=2^9/2^9=1 бит N=2^i=2^1=2 символа.
4)16=2 в степени 4, т.е.
1 символ = 4 бита
384*4=1536 бит = 1536/8 = 192 байт = 192/1024= 0,1875 Кб
5)2^i=N, N = 162^i=16i=4 бит50 * 4 = 200 бит200: 8 = 25 байт