Постройте таблицы истинности для следующих логических выражений:

A v ¬ (A&B)​

1.

program xxx;

var i, n : integer

begin

  writeln ('введите число n=');

  readln (n);

  writeln ('делители числа: ');

  for i: = 1 to n do

      if n mod i = 0 then writeln (i);

  readln

end.

ну в метро, или если ты турист то картой, не?

var

i,s: integer;

begin

s: =0;

for i: =20 to 60 do

if i mod 5 =0 then s: =s+i;

writeln(s);

end.

автоматизация, легкость в использовании, меньше затраты времени на обработку