Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

В паскале сформирвать массив из десяти элементов, заполнить его с помощью генератора случайных чисел и сделать так, чтобы в нем поменялись местами 1 и

10-11 класс

2, 3 и 4 значение и так далее. Нужно написать программу.

Re6po5 21 июля 2015 г., 0:12:12 (8 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Esgtffsdg
21 июля 2015 г., 1:10:03 (8 лет назад)

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.

ПОМОГИТЕ С ПРОГРАММИРОВАНИЕМ!!! 11 КЛАСС!!

описать данную программу словами! как в примере:

Начало 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.

Читайте также

ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из

языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.

1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7

элементов.Найти колличество четных положительных элементов.

3)Дан массив из 6 элементов.Найти произвдение положительных из них.

дан массив из семи элементов написать программу подсчитывающую

среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива

1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива

2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент

1. Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите среднее арифметическое нечетных элементов массива с нечетными

индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы



Вы находитесь на странице вопроса "В паскале сформирвать массив из десяти элементов, заполнить его с помощью генератора случайных чисел и сделать так, чтобы в нем поменялись местами 1 и", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.