Помогите с задачей в Pascal: Дано: m килограмм яблок и n килограмм апельсинов, посчитать...

Question

Помогите с задачей в Pascal: Дано: m килограмм яблок и n килограмм апельсинов, посчитать стоимость покупки если килограмм апельсинов стоит k рублей, а кг яблок r рублей. Уже 4 час сижу с другом и мозг пинаю, все ошибки выпадают различные

Answer 1

var m, n, k, r, sum : integer;

begin

 write('Введите цену яблок: '); read(r);

 write('Введите цену апельсинов: '); read(k);

 write('Введите кг яблок: '); read(m);

 write('Введите кг апельсинов: '); read(n);

 sum := r*m + k*n;

 write('Общая стоимость покупки: ',sum);

end.

---

Comments

Пишет в ошибках встречено Var, а ожидался идентификатор

---

В pascal abc компилируешь?

---

да

---

сейчас я скриншот прикреплю. У меня все компилируется

---

Прикрепил файл pascal

---

Еще у Yarik можешь посмотреть задачу с карамельками, также паскаль?

---

Все получилось?

---

Да, работает, супер

---

сейчас посмотрю что за задача