Написать программу на языке паскаль, напишите программу, использующую модуль, в котором описаны 2 процедуры: первая возвращает произведение двух чисел, вторая их частное.

PolinaFox6002 PolinaFox6002    3   11.07.2019 20:20    3

Ответы
veronikageletii veronikageletii  25.08.2020 07:21
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика