Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
namespace ConsoleApplication4
{
class Program
{
static void Main(string[] args)
{
bool result = false;
Console.WriteLine("Введи строку");
string str = Console.ReadLine();
for (int i = 0; i < str.Length - 1; i++)
{
if (str.Substring(i, 1) == str.Substring(i + 1, 1))
{
result = true;
break;
}
}
if (result == true)
Console.WriteLine("Да, встречаются");
else
Console.WriteLine("Нет, не встречаются");
Console.ReadKey();
}
}
}
1- 10тичная
2-16тиричная
3-двоичная
Ответ:
F=A(с чертой над А)&(AvB)
Объяснение:
0
1
0
0
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (n,k):=(ReadInteger,0);
while n>0 do (n,k):=(n div 10,k+1);
Writeln(k)
end.
Какой страницы world offis например