Введите с клавиатуры массив в, из 10 элементов - вопрос №101577158 от lanadanelianlana 21.12.2021 16:26

Question

Информатика: Введите с клавиатуры массив в, из 10 элементов целого типа, нумерация начинается с 1 и вывести все элементы массива увеличенные в 45 раз.

lanadanelianlana · Answer

var a:array[1..10] of integer; b:array[1..10] of integer; i:integer; begin for i:=1 to 10 do begin read(b[i]); a[i]:=b[i]*45 end; for i:=1 to 9 do write(a[i], ); write(a[10]) end....