begin for i := 10 to 99 do if i mod 5 = 0 then begin s := s + i; k := k + 1; end;
writeln('количество = ', k, ' и сумму = ', s); end.
Reutskii-Kirilovskii1625
26.05.2023
ответ: K = 0, L = 0, M = 0, N = 1.
Строишь таблицу истинности. Просто выполняешь каждое действие и заносишь его в таблицу. ⇒ импликация. Таблица истинности во вложении. Если математически, то это условие: a ≤ b. Если оно выполняется, то условие истинно. Т.е. если a = 1, b = 0, то a ⇒ b = 0(ложь). Во всех остальных случаях 1(истина).
Выполнять надо по приоритету, как в математике. Сначала отрицание ¬, умножение ∧, сложение ∨ и т.д. Импликацию ⇒ обычно делают в конце, если нет эквивалентности ~. Ну и стоит обращать внимание на скобки.
i: integer;
k := 0;
s := 0;
begin
for i := 10 to 99 do
if i mod 5 = 0 then begin
s := s + i;
k := k + 1;
end;
writeln('количество = ', k, ' и сумму = ', s);
end.