Составь таблицу истинности для логического выражения avb^a

81920 бит : 8 = 10240 байт

10240 байт : 1024 = 10 килобайт

понадобится 24 секунды.

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.

файл, правка, вид, вставка, формат, сервис, таблица, окно, справка.