Введите с клавиатуры массив в, из 10 элементов - вопрос №10577333 от диёра2010 27.03.2023 20:25

Question

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

диёра2010 · 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....