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

Объяснить на примерах место телекоммуникационных технологий в функционировании интернета

👇
Ответ:
marikalinich
marikalinich
03.11.2021

.А. сдал в химчистку Р. несколько рубашек. Через неделю он их получил, но поврежденными. На обратной стороне приемо-сдаточной квитанции было указано, что химчистка несет ответственность в размере до трехкратной стоимости услуги. Р. считает, что за вычетом платы за услугу (200 руб.), А. подлежит выплатить 400 руб. А. настаивал на возмещении полной стоимости рубашек (2000 руб.) и отказался от получения предлагаемого возмещения. Кто прав в данном споре? При каких условиях в договоре подряда применяются предписания о защите прав потребителей?

2.Пенсионер Р. сдал свой персидский ковер в чистку В. и заключил соглашение, согласно которому работа стоит 2000 руб., включая доставку ковра в квартиру Р. По истечении двух недель Р. получил свой ковер с приложением расчета, превышающего 2000 руб. на сумму налога на добавленную стоимость. Кроме того, ковер оказался поврежденным, так как ученик мастера не соблюдал правила чистки. Стоимость ковра снизилась в этой связи на 1000 рублей. Какие правоотношения возникают между К. и В.?

3... Н. заключила договор с мастерской В. о ремонте ее стиральной машины. Сотрудник мастерской А. надлежащим образом отремонтировал машину, но плохо закрепил шланг для подачи воды. Когда Н. занималась очередной стиркой, несмотря на все меры предосторожности, произошло затопление. Как квартире Н., так и квартире соседа на нижнем этаже Г. был причинен значительный ущерб. Каковы правовые последствия возникшей ситуации?

4,4(6 оценок)
Открыть все ответы
Ответ:
makslitovchenk
makslitovchenk
03.11.2021
Цикл с предусловием это такой цикл, в котором условие проверяется перед выполнением тела цикла.
А цикл с постусловием - на оборот, он сначала выполнит, а потом проверит условие и если условие true, то цикл завершится.

Цикл с постусловием, можно использовать в таких ситуациях, когда надо что-то сделать и если чего-то не хватает, то сделать еще раз. Напрмер отправить письмо на email, а если не отправилось, то повторить еще 3 раза. Сначала выполнится тело цикла, в котором находятся функции отправки письма и если отправка удачная, то сообщаем until() true. Иначе тело выполнится еще и еще и еще кучу раз, если мы не задали счетчик в теле цикла, как вариант...

Цикл с предусловием можно использовать, если надо проверять какое-то значение ПЕРЕД выполнением тела цикла и тебе не важно, должно ли оно хоть раз выполниться. Например запросить пароль у пользователя. Но если пользователь уже ввёл пароль, то зачем его запрашивать? Тут можно было бы использовать while
4,6(76 оценок)
Ответ:
marinkaa5
marinkaa5
03.11.2021
1
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 2 = 0
        then
            Writeln('Число чётное')
        else
            Writeln('Число не чётное');
    readln;
end.

2
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 3 = 0
        then
            Writeln('Число делится на 3')
        else
            Writeln('Число не делится на 3');
    readln;
end.

3
program z;
var
    i: array[1..6] of byte;
    x:byte;
begin
    for x:=1 to 6 do
   
        begin
            Writeln('Введите ', x,' цифру из 6 ');
            Read(i[x]);
        end;
    if (i[1]+i[2]) = (i[4]+i[5]+i[6])
        then
            Writeln('Билет счастливый')
        else
            Writeln('Билет не счастливый');
    Readln;
end.
       
5)))
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 6 = 0
        then
            Writeln('Число делится на 6')
        else
            Writeln('Число не делится на 6');
    readln;
end.
6
program z;
var
    a,b:integer;
begin
    Writeln('Введите число A'); Readln(a);
    Writeln('Введите число B'); Readln(b);
    if b mod a = 0
        then Writeln('Число А делится нацело на число В')
        else Writeln('Число А не делится нацело на число B');
    Readln;
end.
       
4,7(73 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ