Модули

[Наташок]

Модули

Помогите!!Не врубаюсь в тему модули!Надо решить...

Разработать модуль, реализующий функции калькулятора.Предусмотреть возможность выполнения операций +,-,*,/.Запись операндов осуществляется в польской форме(один операнд,второй операнд,а затем знак операции)

 

[WOLF007]

язык программирования какой?

 

[Vladimir_S]

Помогите!!Не врубаюсь в тему модули!Надо решить...

Разработать модуль, реализующий функции калькулятора.Предусмотреть возможность выполнения операций +,-,*,/.Запись операндов осуществляется в польской форме(один операнд,второй операнд,а затем знак операции)

И на каком языке это надо?

 

[AmGadm]

Я так понимаю что операция ето направление процесса???То эесть в какой среде алгоритмов и чисел она будет работать????

 

[Наташок]

Надо решить на языке Pascal!!!!

 

[dimok5]

Т.е. тут нужно создать основную программу, в которой пользователь вводит нужную операции(+,-,*,/) и программа обращается к модулю, в котором выполняется соответствующая операция!!!!

 

[Vladimir_S]

Т.е. тут нужно создать основную программу, в которой пользователь вводит нужную операции(+,-,*,/) и программа обращается к модулю, в котором выполняется соответствующая операция!!!!

Это Ваша догадка, или Вы знаете точно? Вы вместе с Наташок?

 

[Наташок]

действительно, надо написать программу, в которой пользователь вводит +,-,*,/ и программа обращается к модулю, в котором выполняется соответствующая операция!!!!Как то так!!

 

[dimok5]

Это Ваша догадка, или Вы знаете точно? Вы вместе с Наташок?

Наташок я не знаю, но недавно я составлял похожую программу с таким же условием(только нужно было не в польской форме, а в алгеброической).
Вот и разъясняю условие данной задачи.

 

[Vladimir_S]

Наташок я не знаю, но недавно я составлял похожую программу с таким же условием(только нужно было не в польской форме, а в алгебраической).
Вот и разъясняю условие данной задачи.

Ну так и помогли бы Наташок, раз уже занимались аналогичной задачей, тем более недавно!

 

[dimok5]

Ну так и помогли бы Наташок, раз уже занимались аналогичной задачей, тем более недавно!

Ну так как я уже и отписывался у меня нет времени, тем более на модули.
В пятницу если задача будет не решена, то я попытаюсь её решить!!!

 

[Vladimir_S]

Честно говоря, я просто не понимаю, что требуется. Если нужно составить программу для вычисления a + b, то причем тут модули, и как их сюда впихнуть?

 

[Наташок]

эх,вы !!!!!пока вы тут ругались, и сорили кто-кому поможет я уже вроде как решила эту задачу!!!посмотрите, так?
UNIT My;

INTERFACE
PROCEDURE kalk;

IMPLEMENTATION


PROCEDURE kalk;
var a,b,rez,k: Real;
Oper:Char;
BEGIN
Writeln('Enter number 1');
ReadLn (a);


Writeln('Enter number 2');
ReadLn (b);
Writeln('(+,/,*,-)');
ReadLn (oper);
case oper of
'+' : rez:=a+b;
'-' : rez:=a-b;
'*' : rez:=a*b;
'/' : rez:=a/b;
else WriteLn('I dont now')
end;
WriteLn('Chislo = ',rez );
end;
END.
pROGRAM GFRG;

uses my;
begin
kalk;
end.

 

[dimok5]

Хах...конечно правильно)))
только

pROGRAM GFRG;

uses my;
begin
kalk;
end.

является основной программой и записывается отдельно от модуля.

 

[Vladimir_S]

Ну так она и записана отдельно - раз перед ней "END." (с точкой!) стоит.
Единственное, что я бы добавил - это останов после получения результата (оператор ReadLn; без параметров) в модуль или в основную программу.