чи правильне твердження "при розширеному фільтруванні умови об'єднані логічною операцією АБО, вказуються в різних рядках, а об'єднані логічною операцією І - в одному рядку"?

: знайти суму всіх натуральних чисел від 1 до п. program suma 2; var i, n, s: integer; begin writeln (‘ведіть кількість натуральних чисел: ’);   write (‘n=’); readln (n);

: знайти суму всіх натуральних чисел від 1 до п. program suma 2; var i, n, s: integer; begin writeln (‘ведіть кількість натуральних чисел: ’);   write (‘n=’); readln (n);   i: =1; s: =0;   repeat     s: =s+i;     i: =i+1;   until i> n;   writeln (‘s=’,s);

  i: =1; s: =0;   repeat     s: =s+i;     i: =i+1;   until i> n;   writeln (‘s=’,s);

  наливаем 9 литров  из этого ведра дополна наливаем 5-литровое. осталось 4.  выливаем 5-литровое и опять переливаем из 9-литрового - те самые 4 литра.  наполняем 9литровое и отливаем в 5литровое до полна - 1 литр. остается 8 литров.  выливаем 5-литровое и опять наполняем его из 9-литрового. в 9-литровом осталось 3 литра

решает данную и выводит ответ 

program d1; varu: array[1..16] of real; x: array[1..16] of real; i,z: integer; beginx[1]: =5; for i: =2 to 16 dobeginx[i]: =x[i-1]+0.2; end; for i: =2 to 16 dobeginu[i]: =x[i]*2+3; write(u[i],' | ')end; end.

var a,b,c: integer;

begin

  writeln('введите 3 целых числа');

  read(a,b,c);

  write('среди трех данных чисел есть хотя бы одна пара ');

  if (a=b) or (a=c) or (b=c) then write(' - выражение истинно') else write(' - выражение ложно');

end.