Запишите на языке алгебры логики логические функции, которые будут

принимать значение ИСТИНА, если справедливы следующие утверждения, и ЛОЖЬ — в
противном случае:

№ Утверждения Логическая функция

1 Одно из чисел J, K положительно​

Если считать отрицательные трехзначные, то сумма таких чисел в диапазонах от -999 до -100 и от 100 до 999 будет равна 0. Для только положительных:

//c циклом for
var s,i:integer;
begin
  for i:=100 to 999 do
    if i mod 77 = 0 then s:=s+i;
  writeln('Сумма трехзначных кратных 77: ',s);
end.

Тестовое решение:
Сумма трехзначных кратных 77: 5929

// с циклом while
var s,i:integer;
begin
  i:=100;
  while i<=999 do begin
    if i mod 77 = 0 then s:=s+i;
    i:=i+1;
  end;
  writeln('Сумма трехзначных кратных 77: ',s);
end.

ель примеро с огромным хером у меня проблема ламба или фера я сам не знаю как тебе удобнее будет делать в этом случае я не помню как тебе такой вариант возможен по истории

Черный Rollce Roice забираю джекпот со мной baby мама на нёё потрачу все, зделал новый мув и я заберу долг я у нёё есть парень,но походу он лох.

Объяснение:

ель примеро с огромным хером у меня проблема ламба или фера я сам не знаю как тебе удобнее будет делать в этом случае я не помню как тебе такой вариант возможен по истории

Черный Rollce Roice забираю джекпот со мной baby мама на нёё потрачу все, зделал новый мув и я заберу долг я у нёё есть парень,но походу он лох.