Яким може бути діапазон номерів табличної величини? A) [О. 100]; В) [0,5..100]; Г)-7..100]. Б) [1..100];​

Program znanija;
var A:array[1..20] of integer;   
i,k,min,n:integer;
begin
min:=1000000000; // прощу прощение за такое ) 

for i:=1 to 20 do  A[i]:=random(9); // заполняем массив 

for i:=1 to high(A) do  // находим минимальное нечётное, запоминаем его номер
if (A[i] < min) and (A[i] mod 2 <> 0) then begin
n:=i; min:=A[i];
end;  

for i:=1 to 20 do  write(A[i]:3);   // Выводит весь массив 

writeln();  // просто перевод на новую строку для красоты 

writeln('Minimum: ',min,' Ego nomer: ',n); // выдаём минимальное и его номер
end.

Перевод целых десятичных чисел в любую другую системы счисления осуществляется делением числа на основание новой системы счисления (в нашем случае это 8) до тех пор, пока в остатке не останется число меньшее основания новой системы счисления. Новое число записывается в виде остатков деления, начиная с последнего.

Целая часть от деления
293 div 8 = 36
36 div 8 = 4
4 div 8 = 0
0 div 8 = 0

Остаток от деления
293 mod 8 = 5
36 mod 8 = 4
4 mod 8 = 4
0 mod 8 = 0

Остаток от деления записываем в обратном порядке. Получаем целую часть числа в 8-ой системе счисления: 0445
293 = 0445

Для перевода дробной части числа последовательно умножаем дробную часть на основание 8. В результате каждый раз записываем целую часть произведения.

0.125*8 = 1    (целая часть 1)
0*8 = 0   (целая часть 0)
0*8 = 0   (целая часть 0)
0*8 = 0  (целая часть 0)
1000

Получаем число в 8-ой системе счисления: 1000
0.125 = 0.10008

В итоге получаем число: 0445.10008
ответ: 293.125=0445.10008

Решение было получено и оформлено с сервиса:
Перевод чисел онлайн