1) <span>1011012 - 111112=11100
2) </span>10110(2)+34(8)+15(1)+0(10)+0(10)=56(<span>10)
3) </span><span>1F116=11111000100010110</span>
Var alfa, a1, c, a, g, m, cs : real;
begin
alfa:=30;
c:=13;
a:=-18;
g:=4+(c-a)*(c-a);
a1:=3.14*alfa/180;
cs:=cos(a1-a1*a1);
m:=9.8*(c-a)*(a-c)*cs*cs;
writeln('g = ',g,' m = ',m);
end.
Результат:
g = 965 m = -8843.80431485503
using System;
namespace Interesting {
class Program {
static void Main() {
float Max = 0;
float Sum = 0;
float N = 0;
string s;
float num;
Console.WriteLine("Введите последовательность чисел. Для окончания введите пустую строку");
try {
while (true) {
Console.WriteLine("Введите число");
s = Console.ReadLine();
num = Convert.ToSingle(s);
Max = (num > Max) ? num : Max;
Sum += num;
N++;
}
}
catch (Exception e) {
Console.WriteLine("Ввод закончен");
}
Console.WriteLine("Максимальное = {0}, Среднее = {1}", Max, Sum / N);
}
}
}
2б в 16 с.с. переводишь в 2 с.с. : 101011
101011 в 2 с.с. = 43 в 10 с.с.
111 в N с.с. приравниваешь к 43 в 10с.с.
т.к. во всех разрядах числа 111 стоят единицы, можно число разложить как N^2 + N^1 + N^0 = 43
N^2 + N + 1 =43
N^2 + N = 43-1
а дальше метод подбора
N= 6
Var
a, b, c: real;
begin
write('Стороны треугольника: ');
read(a, b, c);
write('Площадь треугольника: ', sqrt((((a + b + c) / 2)) * (((a + b + c) / 2)-a) * (((a + b + c) / 2)-b)*(((a + b + c) / 2)-c)));
end.
var
num: integer;
begin
write('Введите двузначное число: ');
read(num);
write('Произведение чисел данного числа: ', (num MOD 10) * (((num MOD 100)-(num MOD 10)) / 10));
end.