Дано целое число N (> 0). Найти значение выражения
1.1 – 1.2 + 1.3 – …
(N слагаемых, знаки чередуются). Условный оператор не использовать. помогите, пожалуйста, через паскаль

var
  i, n: integer;
  sign, val, sum: real;
begin
  sign := 1;
  val := 1.1;
  writeln(Введите "n": );
  readln(n);
  for i := 1 to n do
  begin
    sum := sum + sign * val;
    sign := sign * -1;
    val := val + 0.1;
  end;
  writeln(Результат: ,sum);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.