Ошибка: Ожидался порядковый тип - Pascal (12425)

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

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

Program1.pas(6) : Ожидался порядковый тип
program name;
var
y,x,k : real;
begin
var a:=1.45;
for x:=1 to x<=1.8 do
if (a<=x) then
begin 
for k:=1 to k<10 do
y:=exp(k*ln(a))*exp(k*ln(x));
Inc(k);
end;
x:=x+0.1;
end.
Как решить такую проблему? Срочно нужно решить. Спасибо заранее)

Решение задачи: «Ошибка: Ожидался порядковый тип»

textual
Листинг программы
const a=1.45;
var y,x : real;
    k:integer;
begin
x:=1;
while x<=1.8 do
 begin
  if a<=x then
   begin
    for k:=1 to 10 do
    y:=exp(k*ln(a))*exp(k*ln(x));
   end;
  x:=x+0.1;
 end;
end.

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

  1. const a=1.45; - объявляется константа a равная 1.45
  2. var y,x : real; - объявляются переменные y и x типа real
  3. k:integer; - объявляется переменная k типа integer
  4. begin - начинается блок кода
  5. x:=1; - присваивается значение переменной x равное 1
  6. while x<=1.8 do - начинается цикл while x меньше или равно 1.8
  7. begin - начинается вложенный блок кода
  8. if a<=x then - проверяется условие a меньше или равно x
  9. begin - начинается вложенный блок кода
  10. for k:=1 to 10 do - начинается цикл for k от 1 до 10
  11. y:=exp(kln(a))exp(k*ln(x)); - вычисляется значение y
  12. end; - заканчивается вложенный блок кода
  13. x:=x+0.1; - увеличивается значение переменной x на 0.1
  14. end; - заканчивается вложенный блок кода
  15. end; - заканчивается блок кода

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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