ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ ** ЯЗЫКЕ ПАСКАЛЬ, ПОЖАЛУЙСТА Напишите программу, использующую...

Question

ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ, ПОЖАЛУЙСТА
Напишите программу, использующую модуль, в котором описаны 2 процедуры: первая возвращает произведение двух чисел, вторая их частное.

Comments

Именно модуль? Это что, для Турбо Паскаля?

---

abc.pascal

Answer 1

Unit MyModule;
interface
  function prod(a,b:real):real;
  function quot(a,b:real):real;
implementation
  function prod(a,b:real):real;
  begin
    Result:=a*b
  end;
  function quot(a,b:real):real;
  begin
    Result:=a/b
  end;
end.

---------------------------------------------

uses MyModule;
var
  a,b:real;
begin
  Write('Введите через пробел a и b: '); Read(a,b);
  Writeln('a*b=',prod(a,b),', a/b=',quot(a,b))
end.

Тестовое решение:
Введите через пробел a и b: 12 0.5
a*b=6, a/b=24

Comments

Большое, спасибо) А через какую программу открывать модуль?

---

Вы же написали, что ПаскальАВС. Я делал в PascalABC.NET. Сначала создаете файл с именем MyModule.pas из текста, что до разделителя и компилируете его. Затем хагружаете текст после разделителя и исполняете, откомпилированный модуль подтягивается сам по имени файла.

---

Все, получилось) большое спасибо)

---

Для спасибо тут синенькая кнопочка)