Проанализируй таблицу и запиши правильный ответ

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.

не одновременно, а сначала alt и только потом 3 (на цифровой клавиатуре - справа)

а)сумм(a5: b7)

б)срзнач(c4: c7)

var

a,b: real;

begin

readln(a,b);

if (a> 0) or (b< -2) then

writeln('истинно')

else

writeln('ложно');

end.