Введите с клавиатуры, массив 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.
Спасибо большое!