Посещения. Маленький Том находиться дома и он хочет навестить всех своих родственников. Чтобы использовать некоторые дороги, он должен оплатить плату (стоимость использования дороги показана на картинке ниже). Если он использует дорогу более одного раза, ему не нужно платить снова. Некоторые дороги перекрыты камнями, поэтому ини не могут быть использованы. Вопрос: Какая минимальная сумма денег должна быть у маленького Тома, чтобы иметь возможность посетить всех своих родственников? *

Посещения. Маленький Том находиться дома и он хочет навестить всех своих родственников. Чтобы исполь

👇

Увидеть ответ

Ответ:

fasio46

07.07.2022

Объяснение:

4,6(27 оценок)

Открыть все ответы

Ответ:

Лёшка1203

07.07.2022

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

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

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

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

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

4,6(59 оценок)

Ответ:

npodolskaa191

07.07.2022

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.

4,4(100 оценок)

Это интересно:

Кулинария-и-гостеприимство

21.10.2022

Лучший способ приготовления традиционных макарон с сыром...

Стиль-и-уход-за-собой

05.07.2020

Хна для волос: как правильно сочетать и наносить?...

Здоровье

25.04.2020

Как вывести токсины из легких с помощью натуральных средств...

Стиль-и-уход-за-собой