На рисунке ниже представлен чертеж дома. Предложи проект по перепланированию этого дома в умный дом, опираясь на его чер- Чертеж.(еще на дугой вопрос ответьте) ОЧЕНЬ НАДО НА РИСУНКЕ ИЗОБРАЖЕН ДОМ С ГАРАЖЕМ, ЗАЛОМ, СПАЛЬНЕЙ И Т.Г.Д
Если никакие две карточки не были открыты дважды, то все попытки мистера Форда были неудачными, он вытаскивал разные ненужные карточки; все ходы мистера Фокса, кроме последнего, тоже были неудачными, а на последнем ходу он открыл все 5 нужных карточек.
Всего неудачных ходов могло быть не больше 30 - 5 = 25 - это число неподходящих карточек. Мистер Фокс и мистер Форд сделали одинаковое число неудачных ходов, значит, вместе они сделали не больше 24 неудачных ходов, а с учетом последнего, удачного, хода мистера Фокса, ходов могло быть не более 25.
Dim k as integer ' Объявляем глобальную переменную Sub Prog_Summa() Dim S as long, i as long S = 0 ' В переменной S накапливается сумма простых чисел for i=256 to 16384 ' цикл по всем числам, которые надо проверить k=1 ' признак простого числа Prost(i) ' В функции проверяем, что число i простое if k = 1 then S = S + i ' если i - простое, прибавляем его к S next i print S ' Выводим сумму S end sub
Function Prost(x) Dim i as long, Q as long Prost = 0 ' Значение функции пока равно 0 Q = int(sqrt(x)) ' Q=[√(x)] - предел проверки числа x на простоту for i = 2 to Q if int(x/i) = x/i then k=0 ' если х делится на i, то оно составное next i if k = 1 then Prost = x ' если x простое, то функция равна x ' Если x - составное, то функция остается равной 0 End Function
Всего неудачных ходов могло быть не больше 30 - 5 = 25 - это число неподходящих карточек. Мистер Фокс и мистер Форд сделали одинаковое число неудачных ходов, значит, вместе они сделали не больше 24 неудачных ходов, а с учетом последнего, удачного, хода мистера Фокса, ходов могло быть не более 25.
ответ: 25.