• написать программу на языке Паскаль для решения следующей задачи:
    запросить через цикл ввод 14 чисел и среди них найти наибольшее (вывести его на экран)

Ответы 1

  • vara:array[1..14] of integer;max,i:integer;beginwrite('Введите элементы массива - ');for i:=1 to 14 do read(a[i]);max:=a[1];for i:=1 to 14 do begin  if a[i]>max then max:=a[i]; end;writeln('Наибольшое значение в массиве имеет число - ',max);end.
  • Добавить свой ответ

Войти через Google

или

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

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

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