Задать вопрос
2 мая, 18:14

В массиве В (12) случайных целых чисел (диапазон чисел [ - 5 ... 60]) определить: а) сумму элементов

б) количество элементов, которые меньше 7

+5
Ответы (1)
  1. 2 мая, 18:57
    0
    Var B: array [1 ... 12] of integer; i, s, s_min: integer;

    begin

    writeln;

    randomize;

    s : = 0;

    s_min : = 0;

    for i : = 1 to 12 do

    B[i] : = random (65) - 5;

    for i : = 1 to 12 do

    begin

    write (B[i], ' ') ;

    s : = s + B[i];

    if B[i] < 7

    then

    s_min : = s_min + 1;

    end;

    writeln () ;

    writeln ('Sum: ', s, ', amount of elemnts which lower than 7: ', s_min) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «В массиве В (12) случайных целых чисел (диапазон чисел [ - 5 ... 60]) определить: а) сумму элементов б) количество элементов, которые ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы