Var a:array[1..1000] of integer;
<span>sum,n,i:integer; </span>
<span>begin </span>
<span>sum:=0; </span>
<span>writeln('Введите количество чисел'); </span>
<span>read(n); </span>
<span>writeln('Введите числа'); </span>
<span>for i:=1 to n do begin </span>
<span>read(a[i]); </span>
<span>if (a[i] mod 7=0) and (a[i] mod 10=4)then sum:=sum+a[i]; </span>
<span>end; </span>
<span>writeln('Сумма элементов кратных 7 и оканчиваюшихся на 4 = ',sum); </span>
<span>end.</span>
var x: integer;
begin
write('Введите номер дня недели: ');
readln(x);
if (x = 1)then writeln('Понедельник');
if (x = 2)then writeln('ВТорник');
if (x = 3)then writeln('Среда');
if (x = 4)then writeln('Четверг');
if (x = 5)then writeln('Пятница');
if (x = 6)then writeln('Субота');
if (x = 7)then writeln('Воскресенье');
end.
Program SpTrap;
var y , x :integer;
begin
writeln ('ВВеди переменную x');
readln (x);
y:=0
<span>у=(х+1)/2х;
writeln('y=',y);
end
-----------------------------------------------------------------
</span>1. Начало алгоритма
2. Ввод (х)
3. Если (х не равно 0) И (а не равно нулю)
4. y:= (х+1)/2х.
5. Иначе
6. Вывод ('Функция не определена')
7. Конец алгоритма
-----------------------------------------------------------------------------
1. Начало алгоритма
2. объявление переменных
3. Объявление (х)
4. Если (х не равно 0) И (x не равно нулю)
5. y:= (х+1)/2х.
6. Иначе
7. Вывод ('Функция не определена') или ('y=',y)
8. Конец алгоритма
1) Маска подсети: 11111111.11111111.11110000.00000000
IP: 11101000.01111110.10010110.00010010
номер сети - там где у маски единицы, а номер хоста В сети - там где у маски нули.
т.е 0110.00010010 отсюда получаем номер хоста: 0110.00010010 =1554
2) Маска подсети: 11111111.11111111.11100000.00000000
IP: 11001110.10011110.01111100.01000011
Номер хоста: 11100.01000011= 7235
3) Маска подсети: 11111111.11111111.11111100.00000000
IP: 11100010.10111001.01011010.10100010
Номер хоста: 10.10100010=674
Алфавит состоит всего из 62 символов (26 прописных, 26 строчных и цифры 0,1,2,3,4,5,6,7,8,9), следовательно, чтобы закодировать один символ понадобиться 6 бит( т.е. у нас 62 символа, самая близкая степень двойки - это 64, 2 в 6 степени - 64)
Так, у нас 11 символов, 6*11=66 - бит нужно для кодировки пароля. А ближайшее число байт - это 9 (т.к. 8*9=72, в одном байте - 8 бит, 8 байт не хватит - т.к. 8*8=64, а у нас 66)
Доп. сведения - 13 байт.
13 байт + 9 байт = 22 байт.
1 КБ = 1024 байт
1024 байт : 22 байт = 46, 5454545
Ответ: 46 пользователей