В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
kantuz
kantuz
13.03.2022 13:53 •  Информатика

Доставка товара на дом, заказанного в фирме «грива и хвост», стоит 700 рублей в пределах города москва. доставка за пределы горо- да стоит 700 рублей и 100 рублей за каждые дополнительные 10 км пу- ти. если в доме лифт не работает, то к стоимости доставки прибавляет- ся стоимость подъёма на этаж. так, подъем стоит 400 рублей при усло- вии, если квартира находится на этаже не выше пятого. если квартира расположена между пятым и десятым этажами, подъем стоит 400 руб- лей и по 150 рублей дополнительно за каждый этаж выше пятого. если же подъем необходим на десятый этаж или выше, то весь подъем обой- дётся в 1500 рублей. в фирме было сделано четыре заказа с доставкой в города одинцо- во, голицыно, москва и зеленоград с подъёмом товара на 3, 4, 12 и 7 этаж соответственно, при этом известно, что во всех домах, кроме дома по первому заказу лифт не функционирует. расстояние до одинцово, голицыно и зеленограда от москвы равны соответственно 10 км, 30 км и 20 км. с электронной таблицы вычислите: 1) полную стоимости доставки для каждого заказа. 2) номер заказа, стоимость доставки которого максимальна. ответ в отдельной ячейке.

Показать ответ
Ответ:
Гриимитсичень
Гриимитсичень
09.12.2020 08:40
К отличительным признакам объекта относят свойства, действия, поведение, состояние.
Свойства объекта определяются некоторыми величинами, показывающими отличие одного объекта от другого.
Действия показывают что может делать объект или что можно делать с объектом.
Поведение - это подробное описание каждого из действий объекта.
Состояние - это полный набор свойств, которые имеет объект в данное время.

Получается, что состояние перечисляет свойства, а поведение объясняет, что из себя представляют действия.
0,0(0 оценок)
Ответ:
katyaarxipova
katyaarxipova
12.03.2020 21:45
1)
var
a,b,sum : integer;
begin
Readln(a, b);
if (a mod b = 0) then
  begin
  while a > 0 do
    begin
      sum:= sum + (a mod 10);
      a:= a div 10;
    end;
  if sum > b then
    begin
    Writeln('Верно');
    halt;
    end;
  end;
Writeln('Неверно');
end.

Пример:
1234 2
Верно

2)
var
i: integer;
begin
For i:= 100 to 999 do
  if (i*i)mod 1000 = i then Write(i, ' ');
end.

Результат:
376 625

3)
var
i,n : integer;

function Simple(n: Longint): boolean;
var
  i: Longint;
begin
  for i := 2 to Round(Sqrt(n)) do
    if n mod i = 0 then
      break;
  Simple := n mod i <> 0;
end;

begin
  Read(n);
  For i:= 1 to Round(Sqrt(n)) do
     if n mod i = 0 then
       if (Simple(i))and(Simple(n div i)) then
        begin
        Writeln('YES');
        halt;
        end;
  Writeln('NO');
end.

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