Скачать: CL | DM;

Помогите переделать задачу из Pascal в Delphi   Найти похожие ветки 

← →
art ©   (2008-11-12 20:15) [0]

program PPP;
uses crt
const A=10;
var x,y:real;
begin
clrscr;
write ("x=");
read ln (x);
if x <=3*A then y:=-A*exp(x-3*A) else
y:=-A-A*ln(x-3*A);
write ln ("x=", x:10:3,"y=", y:10:3);
read ln
end

PS. В Delphi не разбираюсь, можно сказать, первый раз вижу...

---

← →
Anatoly Podgoretsky ©   (2008-11-12 20:40) [1]

program PPP;
// uses crt
const A=10;
var x,y:real;
begin
// clrscr;
write ("x=");
read ln (x);
if x <=3*A then y:=-A*exp(x-3*A) else
y:=-A-A*ln(x-3*A);
write ln ("x=", x:10:3,"y=", y:10:3);
read ln
end

read ln пишется как readln

---

← →
Servy ©   (2008-11-12 21:04) [2]

> [1]

Туда еще {$APPTYPE CONSOLE} добавить неплохо бы. Ну и пробелы в именах функций убрать.

---

← →
Loginov Dmitry ©   (2008-11-12 22:11) [3]

Еще бы точку в конце после end.

---

← →
Anatoly Podgoretsky ©   (2008-11-12 22:18) [4]

> Loginov Dmitry  (12.11.2008 22:11:03)  [3]

Оставьте, хоть что то ему для самостоятельной работы, а не только сдача работы предподователю.

---

← →
art ©   (2008-11-12 22:59) [5]

все сделано... точку сами поставили после энд... только вот делфи теперь ругается: Runtime error 105 at 004060D9

---

← →
Andy BitOff ©   (2008-11-12 23:02) [6]

Run-time error 105: File not open for output

This error occurs if you try to use standard input and output functions like Readln and Writeln without the Uses WinCRT; statement.

To correct this error, add Uses WinCRT; to your program.

© Borland Pascal Help (bpw.hlp).

---

← →
Anatoly Podgoretsky ©   (2008-11-12 23:28) [7]

> art  (12.11.2008 22:59:05)  [5]

Значит у тебя пока не консольное приложения, советы видимо не читаешь, кроме точки.
Ты поставь указаную директиву или сделай это в настройках проекта.

---

← →
Anatoly Podgoretsky ©   (2008-11-12 23:29) [8]

> Andy BitOff  (12.11.2008 23:02:06)  [6]

Вопрос то про Дельфи, а не про Борланд Паскаль фор Виндоус.

---

← →
Palladin ©   (2008-11-13 10:01) [9]

> PS. В Delphi не разбираюсь, можно сказать, первый раз вижу.
> ..

да ты и в паскале то не очень )

---

← →
Anatoly Podgoretsky ©   (2008-11-13 10:15) [10]

> Palladin  (13.11.2008 10:01:09)  [9]

Тоже в первый раз видит.

---

← →
art ©   (2008-11-13 20:33) [11]

хожу к репетитору. Делфи он не знает, только паскаль, задачу дали написать на делфи. Вот... Есть только решение для паскаля(((

---

← →
www   (2008-11-13 20:43) [12]

>  Есть только решение для паскаля

твое или репетитора?

---

← →
art ©   (2008-11-13 20:44) [13]

репетитора

---

← →
Сергей М. ©   (2008-11-13 20:48) [14]

> art ©   (13.11.08 20:44) [13]


Кудряво живешь, однако) ..

Один за тебя программу пишет, другие за тебя ей в Делфи портируют, а ты сидишь и знай себе в потолок поплевываешь)

---

← →
art ©   (2008-11-13 21:06) [15]

ЭЭЭЭ.... просто обратилась за помошью... Всем спасибо)))

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.015 c