Заполните массив из 10 элементов, в котором каждый - вопрос №105300828 от Grazhdankin 14.08.2020 01:52

Question

Информатика: Заполните массив из 10 элементов, в котором каждый элемент будет равен введенному числу с клавиатуры. const n=10; var a: array [1..n] of integer; i,x: integer; begin readln(x); for i: =1 to n do a[1]: = ; for i: =1 to n do write (a[i]: 6); end.

Grazhdankin · Answer

Const n=10;var a:array [1..n] of integer;i,x:integer;begin readln(x);for i:=1 to n doa[i]:=x;for i:=1 to n dowrite (a[i]:6);end....