Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Введите с клавиатуры, массив B из 10 элементов цэлого типа, и выведите все элементы массива увеличенные в 5 раз.

Ответ оставил Гость

Begin
   for i:=1 to 10 do begin
       read (b[i]);
   end;
 for k:=1 to 10 do begin
       a[i]:= b[i]*5;
 write (a[i]);
  end;
 end.