Составьте программу для ввода с клавиатуры в массив 6 целых чисел и вывода последних 4-х чисел в обратном порядке в первую строку, во вторую строку – первые два числа в обычном порядке, а в третьей строке – второй и пятый элеме...
Составьте программу для ввода с клавиатуры в массив 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
Не нашли ответ?
Похожие вопросы