read(n);
if (n>99) and (n<1000) then writeln('Yes');
Строим таблицу истинности (вложение 1) и затем проводим решение путем сравнения таблиц (вложение 2).
Уточнение к шагу 4. Только одна комбинация из двух единичных аргументов, один из которых В, колонка которого уже известна.
Я не знаю!666765553234455566
Программа на Паскале:
Program BiFi;
Const S=1000;
Var a:array[1..S] of integer;
i,N: integer;
k:LONGINT;
Begin
k:=1
readln(N);
for i:=1 to N do a[i]:= 2*i;
for i:=1 to N do k:=k*a[i];
writeln(k);
readln;
end.
Нужно скачать и все попробуй