27. для отбора конкретной информации из таблиц: • записи → сортировка • перейти в режим таблицы • кнопки - id268797620220903 от MoNsTeR221 03.09.2022 22:57

Question

Информатика: 27. для отбора конкретной информации из таблиц: • записи → сортировка • перейти в режим таблицы • кнопки со знаком фильтра • записи → фильтр

MoNsTeR221 · Accepted Answer

Program z1;
var a:array[1..100] of integer;
n,i:byte;ma:integer;
begin
write('n=');readln(n);
for i:=1 to n do begin
write(i,')');readln(a[i])
end;
ma:=a[1];
for i:=1 to n do begin
if a[i]>ma then begin
ma:=a[i]
end
end;
for i:=1 to n do begin
a[i]:=ma
end;
writeln('test n=',n);
for i:=1 to n do begin
writeln(a[i])
end;
readln
end.

27. для отбора конкретной информации из таблиц: • записи → сортировка • перейти в режим таблицы • кнопки со знаком фильтра • записи → фильтр

MOGZ ответил