Задача Задача №714798
А
А
Пример программы на Pascal:
program InputArray;
var
B: array[1..6] of integer;
i: integer;
begin
for i := 1 to 6 do
begin
write('Введите элемент массива B[', i, ']: ');
readln(B[i]);
end;
writeln('Элементы массива B:');
for i := 1 to 6 do
begin
writeln('B[', i, '] = ', B[i]);
end;
end.
