1 , 2 , 3 , 4 , 5 , 6 , 7 , 8 , 9 , 10 ,
Var x,y: integer;
begin
readln(x);
y:=x+2,5;
y:=y*x;
y:=y-1;
y:=y*x;
y:=y+1;
writeln(y);
end.
<span>300dpi = 2,54 ≈ 118 точек/см.
40*118=4720
20*118=2360
4720x2360- Размер изображения в точках.
4720*2360=11139200
</span><span>11139200*8= 89113600 бит.</span>
Я позволил себе немного изменить Ваш код и сделать его немного более читаемым. Так же, мне не совсем было понятно, зачем Вы сделали главную функцию, которая лишь вызывает еще одну. Поэтому я убрал промежуточную и сделал вызов по кнопке самой главной функции. Далее, принцип работы: вводим цифры/буквы в одно поле и в другое.
Нажимаем кнопку "вычислить". Функции забивают эти данные в массивы и далее сверяют их. Должен признать, мне очень понравилась Ваша реализация. Как работает вывод: объединение - выводит все неповторяющиеся элементы двух массивов. Пересечение - выводит элементы, которые встречались в каждом массиве. Независимо от того, сколько раз. Эта Ваша заслуга.
Пробел - равноценный участник работы. Это символ. Поэтому если Вы введете в два поля сколько угодно пробелов, а потом некие цифры, то в поле пересечение будет пробел, запятая и остальные числа. Если введете лишь в одном поле пробел, то он будет лишь в поле объединение.
Как я ни старался, достичь двух запятых после моей небольшой корректировки у меня не вышло.
З.Ы.: возможно при сохранении файл как html и последующем открывании у Вас отобразятся "кракозябры". Прошу меня простить за это, т.к. редактировал его в VS. Просто измените кодировку на Windows-1251 в браузере.
В этих задачах используются 2 формулы K=S*I, N=2^i
K-объем инф-ии(бит), S- кол-во сим-в, i -вес 1 символа, N- мощность алф.
1.75*5=345 бит
2.1000/8=125 байт
3.9,5 Кбайт=9,5*1024*8=<span>
77824бит, </span><span><span>77824/2560=30,4 бит вес 1 символа, N=2^31 символов в алф.
</span></span>4.40*50*7*5= 70000бит=8750байт
5.3750байт=3750*8=30000 бит, 30000/(5*25*60)=4бита, <span>N=2^4=16 символов в алфавите</span>