tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составьте программу, которая позволяет
Составьте программу, которая позволяет вводить с клавиатуры элементы массива а [1..10] и вывода на экран элементов с четными индексами
Mariya1985
1 25.05.2019 11:50
0
Ответы
Avetodor
01.10.2020 11:25
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
соня230403
19.05.2020 22:20
с информатикой. С кратким решением...
эрика86
19.05.2020 22:21
ДО ТЬ БУДЬ ЛАСКА З КОНТРОЛЬНОЙ ЗАДАЧОЙ З ІНФОРМАТИКИ...
ryschowa
31.07.2019 04:50
Дан массив из 10 целых чисел заполненный случайными числами из интервала [-15; 15].определить является ли произведение элементов массива имеющих нечетные порядковые номера...
Солі
31.07.2019 04:50
Написать программу на delphi: дана матрица а размерность 2xn, которая хранит координаты n точек на плоскости. определить номер точки, суммарное расстояние от которой до...
25690гений
22.09.2019 15:00
Нужно написать программу нахождения большего из 4 чисел заранее огромное...
Вупсінь
22.09.2019 15:00
Некоторый метод шифрования теста основан замене каждой буквы шифруемого текста на другую путем смещения в алфавите от исходной буквы из фиксированное количество символов,...
070974zZ
16.07.2019 02:30
Запиши слова в два столбика: в первый – однокоренные слова, во второй – формы одного и того же слова. обозначь корни. петух, с петухами, петушиный, петушиться, петухом,...
ПОМОГИТЕ1111121
16.07.2019 02:30
Растровый графический файл содержит цветное изображение с 64-ю градациями цвета и размером 160*50 точек. каков информационный объем этого файла в мбайтах?...
Дончара
16.07.2019 02:30
Решить систему x+y 3 x-y больше или равно 1 надоо))...
ника2763
16.07.2019 02:30
Где происходят события кавказский пленник...
Популярные вопросы
нужно чтобы сформировались идиомы...
3
Выполни Письменно 1.(ответь на во в тетради) 1Объясните смысл строк...
2
К окружности, вписанной в равносторонний треугольник, проведены три...
1
В чём сходства и отличия единиц фгр харцызска и новоазовска...
1
She was reading a book while her friends... a)were swimming; b)swam;...
3
1) Перепишите предложение активн. залога в пассивный залог с сохранением...
3
Для функции f(x) = 2 (x-1,5):а) найдите общий вид первообразных;б)...
3
Укажите неверное утверждение. А) График уравнения 3х = 2 – прямая линия,...
3
У тім то й лихо, що не всі ми знаемо про нашу долю де сполучник?...
3
Составьте формулы следующих солей: силикат лития, сульфат калия, нитрит...
3
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.