Сложение в двоичной системе показано в прилагаемом файле.
На паскале
var a: integer;
begin
write('Введите целое число'); Readln(a);
if a>=0 then write(a*a) else write(a*a*a);
end.
Пппппарпрарараврарарарары
Ответ:#include <bits/stdc++.h>
using namespace std;
int main() {
const int x = 3, y = 4;
int N[x], M[y] = { 0, 0, 0, 0 };
int r = 0;
do {
r = 0;
for (int q = 0; q < x; q++) {
N[q] = getchar() - 48;
if (N[q] == -38) q--;
if (N[q] == 0) r++;
}
switch (N[0]) {
case 1: M[N[1]] = N[2]; break;
case 2: M[N[2]] = M[N[1]]; break;
case 3: M[N[2]] = M[N[2]] + M[N[1]]; break;
case 4: M[N[2]] = M[N[2]] - M[N[1]]; break;
}
for (int e = 0; e < y; e++) {
cout << "R" << e << " = " << M[e] << "\n";
}
} while (r != x);
return 0;
}
Объяснение:
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();
}
}
}