• Напишите пропущенные команды.Ввести с клавиатуры массив В,из 13 элементов целого типа,нумерация элементов начинается с 1 и вывести все элементы массива уменьшенные на 71.Паскаль

Ответы 1

  • program mass;

    var

     B: array [1..13] of integer;

    begin

     for var i := 1 to 13 do

     begin

       readln(b[i]);

       b[i] := b[i] - 71;

     end;

     for var i := 1 to 13 do

       write(b[i], ' ');

    end.

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

Войти через Google

или

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

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

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