Есть ответ 👍

Функция принимает в качестве параметра имя файла name function f(name: string): integer;

159
494
Посмотреть ответы 2

Ответы на вопрос:

azharalol
4,6(59 оценок)

Программа будет работать при условии, что указанный файл с целыми числами существует! function p(name: string): integer; var f: file of integer; a,min: integer; beginassign(f, name); reset(f); read(f,min); while not eof(f) do  begin  read(f,a);   if abs(a)< abs(min) then min: =a;   end; close(f); p: =min; end; var s: string; beginwriteln('введите имя файла: '); readln(s); writeln('min = ',p(s)); end. подробнее - на - 

Решения на прикреплённых изображениях


10,101+11,111 10010,01-111,1 11010,11*10,01
10,101+11,111 10010,01-111,1 11010,11*10,01
10,101+11,111 10010,01-111,1 11010,11*10,01

Популярно: Информатика