Хелп помогите. дам 20 баллов. помогите. срочно. Надо состовит схему Pascal. номер 11

Question

Хелп помогите. дам 20 баллов. помогите. срочно. Надо состовит схему Pascal. номер 11

---

Answer 1

На русский переведи. Украинский не понимаю.

Comments

как сделать лучший ответ

---

это не касается информ

---

Погоди

---

По моему одну строчку не правильно. Сейчас проверю еще раз.

---

что

---

ок

---

Вроде все правильно.

---

мм тогда спасибочки

---

Если ошибка будет выскакивать, то вот это попробуй program touristy;
var
a, b, s: Real;
begin
Write('S = ');
ReadLn(s);
Write('A = ');
ReadLn(a);
Write('B = ');
ReadLn(b);
WriteLn('T =', (s - a * 1.5) / b + 1.5);
ReadLn;
end.

---

program только со след строчки