Ребят,помогите,ничего вообще не понимаю...((Что вообще за модуль,содержащий...

0 голосов
26 просмотров

Ребят,помогите,ничего вообще не понимаю...((Что вообще за модуль,содержащий процедуру..нужно написать программу)если можно с объяснениями)

Написать модуль,содержащий процедуру нахождения минимальной цифры натурального числа. Привести пример использования данного модуля.(в Паскале)


Информатика (79 баллов) | 26 просмотров
0

Модуль - это самостоятельная единица в языке Паскаль, которая подключается при помощи служебного слова Uses. Чтобы правильно написать такой модуль, нужно знать версию языка (Turbo/Borland Pascal 7, Pascal.ABC, PascalABC.Net, Free Pascal? Object Pascal, Borland Delphi и т.д.)

0

Кто-то прогуливал занятия? )))

0

Free pascal

0

ну да,есть такой грешок))

Дан 1 ответ
0 голосов
Правильный ответ
Текст модуля (Free Pascal):
unit MyLib;
interface
  procedure MinDigit(n:longint;var md:byte);
implementation
  procedure MinDigit(n:longint;var md:byte);
  var
    d:byte;
  begin
    md:=10;
    while n>0 do begin
      d:=n mod 10;
      if d      n:=n div 10
    end
  end;
begin
end.

Тестовая программа:
uses
  Crt, MyLib;
var
  p:byte;
begin
  ClrScr;
  MinDigit(45134,p);
  Writeln('p=',p);
  ReadKey
end.

Тестовое решение:
p=1

(142k баллов)
0

а что значит interface ,implementation, и почему MyLib и MinDigit?

0

Что значат эти слова - посмотрите в Интернет, там все ясно расписано. Что касается двух последних имен - я так захотел. Имена могут быть любыми. Вы же не спрашиваете, почему переменные в программе называются p,b,n и т.д.?