Задать вопрос
23 февраля, 03:02

Используя линейный массив выведите позицию элемента который в два раза больше первого в паскале

+3
Ответы (1)
  1. 23 февраля, 04:33
    0
    Const n=20;

    var a:array[1 ... n] of integer;

    i, k:integer;

    begin

    Randomize;

    for i:=1 to n do begin

    a[i]:=random (51) ;

    write (a[i],' ') ;

    end;

    writeln;

    k:=0;

    for i:=2 to n do

    if a[i]=2*a[1] then k:=i;

    if k>0 then writeln ('k = ', k)

    else writeln ('Искомый элемент отсутствует') ;

    end.

    Пример:

    21 15 6 25 0 39 13 15 0 14 26 20 42 38 39 46 24 45 35 49

    k = 13
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Используя линейный массив выведите позицию элемента который в два раза больше первого в паскале ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
С # 1. Создайте одномерный массив с 31 элементов, которые заполните случайными целыми числами от 11 до 100-11. Выведите значения элементов массива в строку, разделив их пробелами, 11 нечетное число.
Ответы (1)
1) Дан массив из n элементов. Найти номер наименьшего элемента массива. 2) Дан массив из n элементов. Упорядочить массив по возрастанию. 3) Дан массив из n элементов. Упорядочить массив по убыванию.
Ответы (1)
Задание 1. Заполнение массива от a до b Дан массив из 30 элементов. Заполнить массив начиная с элемента a до элемента b двойками, а остальные элементы нулями и вывести весь массив на экран.
Ответы (1)
1. Задайте массив из 10 элементов с помощью датчика целых случайных чисел. Найдите сумму четных элементов массива. Выведите на экран исходный массив и полученную сумму. 2. Дан массив В (n). Определите произведение элементов, кратных 3.
Ответы (1)
1. заполните одномерный массив B1 размерностью в N (< 30 задает пользователь при выполнении программы) элементов так, чтобы каждый элемент с четным номером был равен половине своего номера, а каждый элемент с нечетным номером - количеству элементов
Ответы (1)