Задать вопрос Регистрация
Помочь другим

  • 1)Дан массив из 10 элементов, вывести их на экран и выяснить, какой из элементов k или s является большим (k, s <11 и задаются с клавиатуры)

Ответы 1

  • var

      a : array [1..10] of integer;

      i, k, s : integer;

    begin

      randomize;

      for i := 1 to 10 do a[i] := trunc (random (100));

      for i : 1 to 10 do write (a[i], ' ');

      writeln;

      read (k, s);

      if a[k] > a[s] then write ('a[k] > a[s]')

      else if a[k] = a[s] then write ('a[k] = a[s]')

      else write ('a[k] < a[s]');

    end.

    • Автор:

      leónkzb1
    • 6 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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