Adashok
22.10.2022 01:00

Чему равно частное двух чисел A=22237*8 и B=4B*16?

ответ запиши в двенадцатеричной системе счисления.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
сорин8888
28.12.2020 01:34
Самыми используемыми являются:
•Соединение через модем(модемное)- ADSL
•Через моб. телефон(мобильное)- GPRS
•Спутниковый
•Оптоволокно(соединение по выделенной линии)

Соединение по выделенному каналу.
После подключения, провайдер/абонент проводит до нужного места оптоволокно или витую пару. Хоть это не самое дешевое решение для подключения к интернету, но зато абонент получает разделенные интернет и телефонную линию, высокую скорость, в пределах 100МБит/сек и за счет определенного диапазона IP-адресов хорушее качество соединения.

Единственным минусом тут является относительно дорогая прокладка кабеля(чем большее расстояние вы прокладываете, тем больше платить), особенно в регионах стран.
0,0(0 оценок)
Ответ:
dibalabagdasar
07.05.2022 19:23
Если число заканчивается на 5 или 0, то по признакам делимости оно кратно 5.

1. Глупый школьный вариант

Перебираем все числа в заданном диапазоне и если встречаем кратное 5, прибавляем его к сумме.

var
  i,s:integer;

begin
  s:=0;
  for i:=1 to 200 do
    if i mod 5=0 then s:=s+i;
  Writeln(s)
end.

Результат:
4100

2. Более умный школьный вариант с циклом while

Первое число, кратное 5 - это 5. А дальше прибавляем по 5 к сумме и ничего не нужно проверять.

var
  i,s:integer;

begin
  i:=5; { первое подходящее число }
  s:=i;
  while i<200 do begin
    i:=i+5;
    s:=s+i
    end;
  Writeln(s)
end.

3. Еще более умный школьный вариант с циклом for

От предыдущего отличается получения нужных чисел.
Замечаем, что ряд 5, 10, 15, 20, ... можно получить из чисел 1, 2, 3, 4, ..., умножая их на 5. И таких чисел будет 40.

var
  i,s:integer;

begin
  s:=0;
  for i:=1 to 40 do s:=s+5*i;
  Writeln(s)
end.

4. Современный вариант на современном Паскале

Генерируем последовательность нужных чисел и находим сумму её элементов.

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

begin
  Range(5,200,5).Sum.Println
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота