Задать вопрос
10 февраля, 21:12

Дан массив X (N). найти произведение тех элементов массива значения которых заключены в интервале [А, В] и кратны 3 или 5

+2
Ответы (1)
  1. 10 февраля, 21:29
    0
    A:array[1 ... 10000] of integer;

    i, n, a, b, k:integer;

    begin

    k:=1;

    readln (n, a, b) ;

    for i:=1 to n do

    readln (a[i]) ;

    for i:=a to b do

    if ((a[i] mod 3) = 0) or ((a[i] mod 5) = 0) then k:=k*a[i];

    writeln (k) ;

    readln;

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