Составьте программу, которая позволяет вводить с клавиатуры элементы массива а [1..10] и вывода на экран элементов массива с нечетными индексами
5-9 класс
|
span>
Var
a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do
readln(a[i]);
for i:=1 to 10 do
if i mod 2<>0
then writeln(a[i]);
end.
Другие вопросы из категории
пажайлуста очень нада ЗАРАНИЕ СПАСИБО
Растровая графика состоит графических примитивов Векторная графика состоит из графических примитивов. Векторная графика состоит из пикселей.
Приведите пример формата (расширения) растровой графики.
написать программу по которой
найти минимальный и максимальный элемент массива и все элементы между ними заменить 0...(10,50)
Срочно
Читайте также
программу ввода элементов массива b[1..6] с клавиатуры и вывода на экран элементов с положительными значемиями
например армия(строка а)
арбуз (строка б)
2)составьте программу ,которая предлагает ввести с клавиатуры две строки а и б ,соеденяет их и выводит результат в одну строку
например: тепло(строка а)
ход(строка б)
Составьте программу ввода с клавиатуры элементов массива a[1..10] и вывода на экран элементов,значения которых являются квадратами целых чисел.
Пример ввода:1 13 4 5 8 9 16 4 100 7
Пример вывода:1 4 9 16 4 100