Ошибка "Ожидалось имя процедуры или функции" - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

На 15 строке выводит ожидалось имя процедуры или функции. Помогите исправить)

Решение задачи: «Ошибка "Ожидалось имя процедуры или функции"»

textual
Листинг программы
program program34;
 
var
  X: array[1..13] of real;
  i: integer;
 
begin
  
  writeln('Введите значения элементов одномерного массива: ');
  for i := 1 to 13 do
  begin
    write('X[', i, '] = ');
    readln(X[i]);
  end;
  
  for i := 1 to 13 do
  begin
    if X[i] > 0 then 
      X[i] := X[i] / 2
    else
      X[i] := x[i] + 5; 
  end;
  for i := 1 to 13 do
    write(X[i]:8:2);
end.

Объяснение кода листинга программы

В данном коде объявлены две переменные: X и i. Переменная X представляет собой одномерный массив из 13 элементов типа real. Переменная i является целочисленной. Сначала программа выводит сообщение с просьбой ввести значения элементов массива. Затем она использует цикл for для прохода по всем элементам массива X. Внутри цикла пользователь вводит значение элемента, которое сохраняется в соответствующем элементе массива X. Если значение элемента положительное, оно делится на 2. Если значение отрицательное, к нему добавляется 5. После завершения цикла, программа выводит значения всех элементов массива X.

Оцени полезность:

9   голосов , оценка 4 из 5
Похожие ответы