М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
СофикаКис
СофикаКис
08.12.2021 09:51 •  Информатика

Какое минимальное основание имеет система счисления, если в ней записаны числа 548, 1024, 567, 111, 888 ?

👇
Ответ:
masha007009
masha007009
08.12.2021

9

Объяснение:

Максимальная используемая цифра 8 => следовательно система с минимальным основанием девятеричная.

4,5(37 оценок)
Открыть все ответы
Ответ:
maks123321456
maks123321456
08.12.2021

ответ: южно-казахстанская область является одним из крупных регионов республики и граничит на востоке с жамбылской областью, на севере - с карагандинской, на западе - с кызылординской областью и на юге - с узбекистаном. ее территория - 117,3 тыс.кв.км, здесь проживает около 2,5 млн.человек.

в административно-территориальную структуру области входят 4 области и 4 города районного значения, 11 сельских районов. объем городского населения – 36,8%. областной центр - город шымкент.

регион богат месторождениями полезных ископаемых, таких как барит, уголь, железные и полиметаллические руды, бентонитовые глины, вермикулит, тальк, известняк, гранит, мрамор, гипс, кварцевые пески. по запасам урана область занимает первое место, фосфоритов и железных руд - третье место по республике.

область располагает двумя направлениями железных дорог, общей протяженностью 444,6 км, автомобильными дорогами общего пользования 5,2 тыс.километров, в т.ч. с твердым покрытием - 5,1 тыс. километров.

гражданская авиация работает на линиях протяженностью 27 тыс. км.

областной центр расположен на оси международной магистрали оренбург - ташкент и туркестано-сибирской магистрали. кроме того, имеет удобные связи по автомагистралям: ташкент - шымкент - тараз - алматы и ташкент - шымкент - туркестан - самара.

в промышленности области действуют 182 крупных и средних предприятия, производящих около 2,0 процентов объема промышленной продукции казахстана.

доля отдельных отраслей в общем объеме выпускаемой в области промышленной продукции выглядит следующим образом:

перегонка нефти – 8,9%;

текстильная и швейная промышленность – 4,8%;

производство и распределение электроэнергии, газа и воды – 10,6%;

производство пищевых продуктов и табачных изделий – 38,0%;

производство цветных металлов – 3,6%;

машиностроение – 5,8%;

другие отрасли - 28,3%.

в число наиболее крупных предприятий республики входят: оао «петроказахстан ойл продакс», зао «южполиметалл», оао «шымкентцемент», оао «асбоцемконструкция», оао «шымкентмай», оао «химфарм», тоо «шымкентпиво», зао «джей ти ай сентрал эйжа».

южно-казахстанская область располагает значительным производственно- потенциалом. это один из самых трудоизбыточных регионов казахстана.

объяснение:

4,6(34 оценок)
Ответ:
носок455
носок455
08.12.2021
1. Внимательно читаем условие задания. Требуется составить и использовать процедуру, которая считает сумму двух одинаковых чисел.
Остальное текстуально относится к самой программе: ввод данных, проверка условия с зацикливанием и вывод.

// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

procedure Strange(a,b:real; var c:real; var flag:boolean);
begin
  flag:=a=b;
  if flag then c:=a+b
end; 

begin
  var a,b,c:real;
  var f:boolean;
  while true do begin
    (a,b):=ReadReal2('Введите пару чисел:');
    Strange(a,b,c,f);
    if f then begin
      Writeln('Сумма равна ',c);
      break
      end
    else Writeln('Числа не равны')
    end
end.

Пример
Введите пару чисел: 2 4.5
Числа не равны
Введите пару чисел: 4 4
Сумма равна 8

2. Можно представить, что автор задания не в ладах с русским языком и на самом деле процедура должна сделать все сама, а программа - только вызвать эту процедуру. Тогда решение может быть таким.

procedure Strange2;
begin
  while true do begin
    var (a,b):=ReadReal2('Введите пару чисел:');
    if a=b then begin 
      Writeln('Сумма равна ',a+b);
      exit
      end;
    Writeln('Числа не равны')
    end
end; 

begin
  Strange2
end.

Пример
Введите пару чисел: 4.5 4.4
Числа не равны
Введите пару чисел: 3.6 3.6
Сумма равна 7.2
4,8(99 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ