Как называется процесс преобразования информации из непрерывной формы в дискретную
217
420
Ответы на вопрос:
var i,max: integer; fio: string; x: array[1..5] of integer; f1,f2: text; begin assign(f1, 'out.txt'); assign(f2, 'out2.txt'); rewrite(f1); rewrite(f2); for i: =1 to 5 do begin writeln('daite fio ',i,'-ogo rabotnika'); readln(fio); writeln('daite otklad rabotnika ',i); readln(x[i]); writeln(f1, i,' ',fio,' ',x[i]); fio: =''; end; max: =x[1]; for i: =1 to 5 do if x[i]> max then max: =x[i]; writeln(f2, max); close(f1); close(f2); readln; end.
rabotatet! proveril v pascale
Популярно: Информатика
-
Camilla00702.07.2021 14:10
-
slavi4ka27.06.2022 15:05
-
sDomenic29.01.2021 03:19
-
kat2000T05.07.2022 08:07
-
Rybinchik11.01.2022 06:46
-
rostislav201725.03.2021 18:26
-
Надя030124.12.2022 08:34
-
runeto12.06.2023 06:52
-
garanina200507.03.2023 20:46
-
aman138204.12.2021 17:56