• дан массив из 10 целых чисел определите сколько элементов этого массива имеют максимальное значение

Ответы 2

  • не чет не так упростил не робит
  • const  n=10;var  i,b,max:integer;       a: array [1..n] of integer;begin   for i:=1 to n do   begin       a[i]:=random(1,50); end;  writeln(a);  max:=a[1];  for i:=1 to n do begin     if max<a[i] then max:=a[i]  end;  writeln(a[1]);  writeln(a);  end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years