Напишите пропущенные команды.Ввести с клавиатуры массив В,из 13 частей целого

Напишите пропущенные команды.Ввести с клавиатуры массив В,из 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.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт