Составьте программу для ввода с клавиатуры в массив 6 целых чисел и вывода последн
Составьте программу для ввода с клавиатуры в массив 6 целых чисел и вывода последних 4-х чисел в обратном порядке в первую строку, во вторую строку – первые два числа в обычном порядке, а в третьей строке – второй и пятый элементы массива
Гость
Ответ(ы) на вопрос:
Гость Var b:integer;
a: array [0..5] of integer;
beginfor b:=0 to 5 do begin
read(a[b])
end;
for b:=5 downto 2 do begin
write(a[b],);
end;
writeln(');
for b:=0 to 1 do begin
write(a[b],);
end;
writeln(');
for b:=0 to 5 do begin
if (b=1) or (b=5) then write(a[b],);
end;
end
Не нашли ответ?
Похожие вопросы