1. Что такое переменная? 2. Что называется оператором?
3. Что называется линейным алгоритмом?
4. Назвать действия, используемые при написании математических выражений?
5. Что позволяет вводить оператор input()?
6. Какой оператор используется для вывода числовых данных?
7. Назвать языковой алфавит Пайтона.
дайте ответ побыстрее ​

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

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

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

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

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

Var x,y,z,f:integer;
begin
write('Введите число: ');
readln(x);
while x>0 do
   begin
   y:=x mod 10;
   z:=x div 10;
      while z>0 do
         begin
         if (z mod 10)=y then f:=1;
         z:=z div 10;
         end;
   x:=x div 10;
   end;
if f=1 then writeln('Верно, есть одинаковые цифры')
   else writeln('Нет одинаковых цифр')
end.

Если использовать строковые ф-ии, то программа будет проще:
var
  i,k,f:integer;
  s,t:string;
begin
write('Введите число: ');
readln(s);
k:=length(s);
for i:= 1 to k do
  begin
  t:=copy(s,i+1,k-i+1);
  if pos(s[i],t)>=1 then f:=1;
  end;
if f=1 then writeln('Верно, есть одинаковые цифры')
  else writeln('Нет одинаковых цифр')
end.