В паскале сформирвать массив из десяти элементов, заполнить его с помощью генератора случайных чисел и сделать так, чтобы в нем поменялись местами 1 и
10-11 класс
|
2, 3 и 4 значение и так далее. Нужно написать программу.
Program Task;
Var a: Array [1..10] of Integer;
i, tmp: Integer;
Begin
Randomize;
WriteLn('Сформированный массив:');
For i := 1 To 10 Do
Begin
a[i] := Random(10);
Write(a[i], ' ');
End;
WriteLn;
For i := 1 To 5 Do
Begin
tmp := a[i * 2];
a[i * 2] := a[i * 2 - 1];
a[i * 2 - 1] := tmp;
End;
WriteLn('Измененный массив:');
For i := 1 To 10 Do
Write(a[i], ' ');
ReadLn;
End.
Другие вопросы из категории
Составьте программу нахождения количество цифр натурального числа n.
s=(1/3)п*r^2*h
описать данную программу словами! как в примере:
Начало t1
Приглашение для ввода строки
Ввод строки
Задать начальные значения переменных
Обработка строки
Вывод результата - какой д. б. результат?
Конец t1
Конец t1
Program ww;
var k,s:string;
i:integer;
begin
writeln ('Введите слово из четного числа букв');
readln (s);
k:= 'vv';
writeln ('обработка строки');
for i:=1 to round(length(s)/2) do
k:=k+s[i];
s[i]:=s[length(s)-i];
s[length(s)-i]:=k; }
writeln (k); {Вывод результата}
end.
Читайте также
языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива
2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы