калькулятор на паскале

Ответ от BANER[гуру]
хах)) ) интересно что вы хотели получить в ответ?
готовое решение?
если проблема в написании процедур и функций прикрепите исходник без них)) )
если легко без процедур, напишите)) ) а уж процедуры и функции мы вам напишем
вот есть.. .врядли только преподу вы объясните что это вы сами писали
эммм.. .если это калькулятор....ну судь не в этом
в начале программы вы описываете функции
напр сложение
function sum(a, b: integer): integer;
var
s: integer;
begin
s := a + b;
sum := s;
end;
var
a, b: integer;
begin
readln(a, b);
writeln(sum(a, b));
end.
если процедура, то
procedure sum(a, b: integer);
var
s: integer;
begin
s := a + b;
writeln(s);
end;
var
a, b: integer;
begin
readln(a, b);
sum(a, b);
end.
как видите ничего сложно.. .сначала описываете все функции и процедуры, а потом в тексте программы просто вызываете их