Есть ответ 👍

Выбери правильный ответ.
Взаимно однозначным соответствием множеств является-

146
347
Посмотреть ответы 1

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


Program maxof; var ar: array [1..100] of integer; i, j, posl: shortint; max: integer; begin readln(i); for j: =1 to i do begin readln(ar[j]); end; max: =ar[1]; posl: =1; for j: =2 to i do begin if max = ar[j] then inc(posl); if max < ar[j] then begin posl: =1; max: =ar[j] end;   end; writeln(max, ' x', posl); end.

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