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

dlimfam dlimfam    1   07.10.2019 02:10    23

Ответы
Anuxi1488 Anuxi1488  11.08.2020 14:30

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика