Using System;
//Напишите программу которая определяет в заданном числе заданную цифру.
//Цифра это числа от 0 до 9
namespace NoNamespace {
internal class Program {
private static void Main() {
Console.WriteLine(IsDigitInNumber(123.8, 2));
Console.WriteLine(IsDigitInNumber(1, 1));
Console.WriteLine(IsDigitInNumber(103.28, 2));
Console.ReadLine();
}
private static int IsDigitInNumber(double number, uint digit) {
if (0 > digit || digit > 9)
throw new Exception("Не верный формат цифры");
var n = number.ToString().IndexOf(digit.ToString());
var p = number.ToString().IndexOf(".");
//Console.WriteLine($"number = {number} digit = {digit} n = {n} p = {p} A = {p-n}");
return p-n;
}
}
}
Единичная система счисления Необходимость в записи чисел стала возникать у людей еще в древности после того, как они научились считать. Свидетельством этого являются археологические находки в местах стойбищ первобытных людей, которые относятся к периоду палеолита (10-11 тыс. лет до н.э.). Изначально количество предметов изображали, используя определенные знаки: черточки, насечки, кружочки, нанесенные на камни, дерево или глину, а также узлы на веревках. Рисунок 1. Ученые эту систему записи чисел называют единичной (унарной), поскольку число в ней образовано повторением одного знака, который символизирует единицу.
Информация взята с сайта биржи Автор24: https://spravochnick.ru/informatika/sistemy_schisleniya/nepozicionnye_sistemy_schisleniya/ .
Var
a: array [1..10] of integer;
i, n: byte;
begin
Randomize;
for i:=1 to 10 do
begin
a[i]:=random(100)-50;
n:=abs(a[i] mod 10);
if (n = 4) or (n = 8) then write(a[i]:4);
end;
readln;
<span>end.</span>
А) =23,3(8)
б) =19,375(10)
в) =13,6(16)
