Паскаль 1. дано натуральное число n и n целых чисел, задаваемых пользователем. определить, сколько среди этих n чисел двузначных. массивы не использовать. 2. дано натуральное число n и n целых трехзначных чисел, задаваемых пользователем. определить, сколько среди этих n чисел таких, что произведение их цифр равно к. массивы не использовать

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(ReadSeqInteger('Вводите числа:',ReadInteger('N='))
      .Where(x->Abs(x).Between(10,99)).Count)
end.

Пример
N= 5
Вводите числа: 23 -4 100 -42 16
3

begin
  var k:=ReadInteger('K=');
  Writeln(ReadSeqInteger('Вводите трехзначные числа:',ReadInteger('N='))
      .Where(m->Abs((m mod 10)*(m div 100)*(m div 10 mod 10))=k).Count)
end.

Пример
K= 8
N= 10
Вводите трехзначные числа: 142 712 426 -222 318 916 107 932 -116 473
2

Var N,sum:integer;
begin
sum:=0;
write('Введите N:');
readln(N);
for var i:= 1 to N do
begin
readln(N);
if (abs(N)>9) and (abs(N)<=99) then
sum:=sum+1;
end;
writeln('Количество двузначных чисел:',sum);
end. 

var N,K,sum:integer;
begin
sum:=0;
write('Введите N:');
readln(N);
write('Введите K:');
readln(K);
for var i:= 1 to N do
begin
readln(N);
if (abs(N)>9) and (abs(N)<=99) then
if (((N div 100)*((N div 10) mod 10)*(N mod 10)) = K) then
sum:=sum+1;
end;
writeln('Количество чисел:',sum);
end. 

1. "Молекулы состоят из атомов!" - 27 символов.

27*16 = 432 бита = 54 байта.

2. "Я к вам пишу- чего же боле? Что я могу еще сказать?" - 51 символ.

51*16 = 816 бит = 102 байта.

3. "Любишь кататься- люби и саночки возить!" - 39 символов.

39*32 = 1248 бит = 156 байт.

4. "Семь раз отмерь, один раз отрежь!" - 33 символа.

33*5 = 165 байт (1320 бит).

В общем виде: пусть n - количество символов в тексте, i - количество бит на символ, тогда объём V будет равен V = ni.

Также следует помнить, что 1 байт - это 8 бит.

Объяснение:

1.Фи́шинг — вид интернет-мошенничества, целью которого является получение доступа к конфиденциальным данным пользователей — логинам и паролям.

2.Тро́ллинг — форма социальной провокации или издевательства в сетевом общении, использующаяся как персонифицированными участниками, заинтересованными в большей узнаваемости, публичности, эпатаже, так и анонимными пользователями без возможности их идентификации.

3.Интернет тролли, конечно же, также встречаются. За этой аббревиатурой стоят конкретные люди, ведь троллем, который вас достаёт, например в какой нибудь социальной сети, вполне может оказаться и ваш сосед)) да кто угодно!В данный период времени Интернет троллингом могут заниматься как люди, так и специально разработанные программы работающие автономно, которые с вами могут поддерживать диалог, отвечая на ваши сообщения.

4.Интернет-травля, или кибертравля, — намеренные оскорбления, угрозы, диффамации и сообщение другим компрометирующих данных с современных средств коммуникации, как правило, в течение продолжительного периода времени

5.Спам (— массовая рассылка корреспонденции рекламного характера лицам, не выражавшим желания её получить, а также рассылка массовых сообщений. Распространителей спама называют спамерами.