Объяснение:
Утверждение мистера Фокса может быть и истинным и ложным. Чтобы точно узнать какое оно может быть достаточно перевернуть одну карточку.Перевернули одну любую карточку,видим несоответствие-мистер Фокс лжёт,если карточка соответствует истине переворачиваем любую вторую карточку,Если видим несоответствие-мистер Фокс лжёт,если карточка истинна то делаем вывод,что мистер Фокс пока не солгал.
Итак процедура идет до проверки всех четырех карточек.Все 4 карточки соответствуют утверждению,то мистер Фокс не лжёт,в противном случае утверждение мистера Фокса не истинно.
Вот
(см. объяснение)
Объяснение:
Перед написанием программы я объясню идею:Я покажу тебе метод, как обойтись без цикла.
Вспомним формулу суммы арифметической прогрессии:
С ее можно без труда найти сумму всех четных элементов прогрессии, не забывая, что они идут через 2 (30, 32, 34, 36 и т.п.):
(примечание: здесь n=70/2=35)
Тогда сумма нечетных чисел:
Теперь перейдем к написанию программы:
begin
writeln('Сумма четных: ', (30+98)/2*35 , '; Сумма нечетных: ', (31+99)/2*35);
end.
Возможно также НЕ ОПТИМАЛЬНОЕ решение (не рекомендую использовать):var i,n,c:integer;
begin
for i:=30 to 99
do begin
if(i mod 2 = 0) then c:=c+i
else n:=n+i;
end;
writeln('Сумма четных: ', c, '; Сумма нечетных: ', n);
end.
Тогда составим уравнение: x+4+2x+2 = 4x+1
3x+6 = 4x+1
x=5
Следовательно этот пример решается в 5-ричной системе счисления