Предмет: Информатика,
автор: meganka
Сформируйте одномерный массив из 6 элементов (значения элементов укажет пользователь с клавиатуры). Удалить элемент под номером 3.
Ответы
Автор ответа:
0
uses crt;
var a:array[1..6] of integer;
i:integer;
begin
for i:=1 to 6 do
readln(a[i]);
writeln;
for i:=3 to 5 do
a[i]:=a[i+1];
a[6]:=0;
for i:=1 to 5 do
writeln(a[i]);
end.
var a:array[1..6] of integer;
i:integer;
begin
for i:=1 to 6 do
readln(a[i]);
writeln;
for i:=3 to 5 do
a[i]:=a[i+1];
a[6]:=0;
for i:=1 to 5 do
writeln(a[i]);
end.
Интересные вопросы
Предмет: История,
автор: tvlego819
Предмет: Английский язык,
автор: mikoshow077
Предмет: Қазақ тiлi,
автор: milan1210
Предмет: Алгебра,
автор: Ваня47
Предмет: География,
автор: 000ДаФуЛьКа000