<span><span>
using</span> System;
using System.IO;
using System.Linq;
namespace FileApp
{
class MainClass
{
private static int Multicast(char first,char second, int system)
{
return Convert.ToInt32(first.ToString(), system) * Convert.ToInt32(second.ToString(), system);
}
private static void Method(string numberString,int system)
{
int firstAndSecond = Multicast(numberString[0], numberString[1], system); // Первые два
int lastAndPrevious = Multicast(numberString.Last(), numberString[numberString.Length - 2], system); //Последний и предпоследний
int firstAndLast = Multicast(numberString.First(), numberString.Last(), system); // Первый и последний
Console.WriteLine($"Произведение первых двух цифр: {firstAndSecond}");
Console.WriteLine($"Произведение последних двух цифр: {lastAndPrevious}");
Console.WriteLine($"Произведение первой и последней цифры: {firstAndLast}");
}
public static void Main(string[] args)
{
Console.Write("Введите число: ");
string numberString = Console.ReadLine(); //Число в виде строки
Console.Write("Выберите систему счисления: ");
int system = Convert.ToInt32(Console.ReadLine());//Система счисления
Method(numberString, system);
Console.ReadLine();//Задержка
}
}
}
</span>
Var a,b,c,x :integer;
function NOD(a,b:integer):integer;
begin
while a<>b do
if a>b then
a:=a-b
else b:=b-a;
Result:=a;
end;
begin
write('Введите a,b,c: ');
readln(a,b,c);
x:=NOD(NOD(a,b),c);
writeln('НОД=',x)
<span>end.</span>
IP 18. 168. 250. 32
cеть 18. 168. 240. 0
маска 255.255. XXX. 0
-------------------------------------
250= 1111 1010 (2сс)
240= 1111 0000 (2сс)
XXX=1111 0000 =240---> единственный возможный третий байт маски
ответ 1
Program gt;
var i,p:int64;
begin
p:=1;
for i:=1 to 1000 do
begin
if(i mod 2=1)and(i mod 13=0)then p:=p*i;
end;
writeln(p);
end.