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

Правительство байтландии приняло решение о поддержке отечественных производителей электроники.одна из компаний разработала жидкокристалличесие дисплеи для электронных счетчиков,которые могут отображать цифры.каждая цифра изображается с семи сегментов,каждый из которых может быть включен или выключен.
Все счетчики будут вести отсчет от нуля до некоторого числа k,последовательно проходя по всем значениям.ведущие нули в числах,отображаемых на счетчиках,не отображаются,все сегменты перед первой значащей цифрой включены
За одну операцию можно изменить состояние одного сегмента (включить или выключить).компания получила заказ на изготовление n типов счетчиков,для каждого из типов известно максимальное значение счетчика ki.для каждого из типов счетчика определите,какое количество операций по изменению состояния сегмента необходимо будет произвести для прохода по всем значениям от нуля до ki.
В первой строке входных данных записано число t –количество различных типов счетчиков.в следующих t строках записаны числа ki.ответ для каждого типа счетчика выведете в отдельной строке
В первом тесте t=3,ki не превосходит 100
Во втором тесте t=700,ki не превосходит 10**9

входные данные
3
2
10
3
выходные данные
9
34
11

👇
Открыть все ответы
Ответ:
vladimir1232
vladimir1232
27.09.2022
А листик тебе Почтой России выслать или через знакомых передать? В задачке можно вывести формулу, но мне лень, сделаем через цикл.

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём ИЗ "...\Отделы\Обмен\";

ПЕР
  дрожжи, процент, расход, дней: ВЕЩ;
  сч: ЦЕЛ;

УКАЗ
  дрожжи := 120;
  Вывод.Цепь("p: "); процент := Приём.Число();
  Вывод.Цепь("Tx: "); расход := Приём.Число();
  Вывод.Цепь("Tt: "); дней := Приём.Число();
  ОТ сч := 1 ДО дней ВЫП
    дрожжи := дрожжи + дрожжи * (процент / 100) - расход
  КОН;
  Вывод.ЧВещ("^%g", дрожжи, 0, 0, 0)

КОН Задание.
4,5(50 оценок)
Ответ:
misterbango
misterbango
27.09.2022
// Это комментарии и они не влияют на выполнение программы

var
num1:Integer; //число 1
num2:Integer; //число 2
num3:Integer; //число 3
summ:Integer; //сумма

begin
writeln('введите три числа');
read(num1, num2, num3); //вводим три числа

if (num1 mod 10 = 1) and (num1 mod 7 = 0) then
//при делении на 10, остаток это будет последней цифрой
//затем проверям кратно ли num1 7, если да то прибавляем его к сумме
summ:=summ+num1;

//тоже самое выполняем с num2
if (num2 mod 10 = 1) and (num2 mod 7 = 0) then
summ:=summ+num2;

//и num3
if (num3 mod 10 = 1) and (num3 mod 7 = 0) then
summ:=summ+num3;

write('Сумма: ',summ);//выводим сумму
end.
4,4(98 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ