Из каждых трёх выберите два высказывания, являющихся
отрицаниями друг друга:
1) «1999 < 2000», «1999 > 2000», «1999 ≤ 2000»;
2) «Петя решил все задания контрольной работы», «Петя не
решил все задания контрольной работы», «Петя решил не
все задания контрольной работы»;
3) «Луна — спутник Земли», «Неверно, что Луна — спутник Земли», «Неверно, что Луна не является спутником
Земли»;
4) «Прямая a не параллельна прямой c», «Прямая a перпендикулярна прямой c», «Прямые a и c не пересекаются»
(считаем, что прямые a и c лежат в одной плоскости);
5) «Мишень поражена первым выстрелом», «Мишень поражена не первым выстрелом», «Неверно, что мишень поражена не первым выстрелом».
Для определения чётности или нечётности числа используется следующее условие:
if S%2==0:
print('Число чётное')
else:
print('Число нечётное')
Разберём условие S%2==0:
Знак % находит остаток от деления чисел, при этом целую часть он не учитывает. Так, например, 5%2 будет равняться 1
Ещё несколько примеров нахождения остатка:
15%4=3
10%7=3
6%2=0
Чётное число это число, которое делится на 2 без остатка, именно это мы и проверяем: если число делится на 2 без остатка (т.е., остаток 0), то оно чётное, а если же нет, то оно нечётное.
"...напечатает сначала 2, потом - 6" -- это значит a=2 и b=6?
про пятеричные записи ничего не понял... :) И ИМХО к чему такие сложности? И для чего нам комп и программа? Я подправил исходную прогу чтобы она выдавала все числа подходящие по условию
var x,a,b: longint;
begin
for var i := 999 DownTo 100 do begin
a := 0;
b := 1;
x := i;
while x>0 do begin
if x mod 2 > 0 then a := a+1 else b := b+(x mod 5);
x := x div 5;
end;
if (a = 2) and (b = 6) then writeln('x = ', i, ' a = ', a, ' b = ',b);
end;
end.
прога проводит расчет для всх трехзначных чисел от 999 до 100
итого мы видим что максимальное подходящее число это 960
при необходимости прогу можно переделать чтобы она находила только максимальное число.