Задать вопрос
15 ноября, 05:44

дан массив А, содержащийф последовательность чисел: 0,5; 12; -18; 16; 13; 5; 8; 0 Сформировать массив В. каждый элемент которого вычисляется по формуле: В (I) = A (I) / 2 Вывести на печать элементы массива В Вычислить сумму элементов массивов А И В Вывести на печать первый элемент массива А и первый элемент массива В

+1
Ответы (1)
  1. 15 ноября, 07:15
    0
    Есть сомнения в том первый элемент массива это 0.5 или же это 2 элемента 0 и 5 и тогда объявление массивов будет следующим var a:array[1 ... 9] of integer = (0,5,12,-18,16,13,5,8,0) ; b: array[1 ... 9] of real;

    Program massiv;

    Uses Crt;

    var a:array[1 ... 8] of real = (0.5,12,-18,16,13,5,8,0) ;

    b: array[1 ... 8] of real;

    sum:real

    i:integer;

    begin

    clrscr;

    write ('Массив B: ') ;

    sum:=0;

    for i:=1 to 8 do

    begin

    b[i]:=a[i]/2;

    sum:=sum+a[i]+b[i];

    write (b[i]:2:2) ;

    end;

    writeln;

    writeln ('Сумма элементов массивов а и b: ', sum) ;

    writeln (' Первый элемент массива а : ', a[1]:2:2) ;

    writeln (' Первый элемент массива b : ', b[1]:2:2) ;

    readkey;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «дан массив А, содержащийф последовательность чисел: 0,5; 12; -18; 16; 13; 5; 8; 0 Сформировать массив В. каждый элемент которого ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
1. Дан двумерный массив размером 3x5. Вычислить сумму элементов массива 2. Дан массив целых чисел размеров 4 х4. Заменить все элементы главной диагонали на нули. Вывести на экран монитора содержимое массива до обработки и после обработки 3.
Ответы (1)
1. Возвести в квадрат все элементы массива A. Размер массива и значения элементов массива - произвольные. 2. Увеличить на 4 все элементы в первой половине массива A (считать, что в массиве чётное число элементов).
Ответы (1)
Помогите решить задачи на паскаль. 1) Дан массив случайных чисел (количество элементов вводите с клавиатуры). Найти произведение всех элементов массива. 2) Дан массив случайных чисел (количество элементов вводите с клавиатуры).
Ответы (1)
1. Массив и 4 целых чисел вводится с клавиатуры. Найти и вывести произведение элементов массива. 2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива. 3.
Ответы (1)