1. Посмотреть цену 2. Опустить монеты 3. Подойти к автомату 4. Набралась нужнаясумма? 5. Достать деньги 6. Взять банку 7. Поискать недостающую сумму в дырках кармана
Ответ:
70
Объяснение:
Дано условие "не (х<=71) или (х не делится на 7)" и требуется его ложность. Добавим к нему отрицание и будем искать истинность:
не (не (х<=71) или (х не делится на 7))
По закону де-Моргана избавимся от внешнего отрицания:
(х<=71) И НЕ (х не делится на 7), что равносильно
(х<=71) И (х делится на 7)
Итак, нужно найти такое наибольшее число, которое кратно 7 и не превышает 71.
71 не кратно 7, а следующее меньшее, 70 - кратно. Это и есть ответ.
Ответ:
var
a,b,c,n,s: integer;
begin
readln(n);
if ((n>99) and (n<1000)) then
begin
a:=n div 100;
b:=n div 10 mod 10;
c:=n mod 10;
s:=a+b+c;
writeln('Сумма трех цифр равна ',s);
end else writeln('Введите трехзначное число!');
end.
Объяснение: