Задать вопрос
25 января, 04:44

дан массив размера N и целые числа K и L (1< = K <=L<=N). Найти сумму элементов массива с номерами от K до L включительно

+1
Ответы (1)
  1. 25 января, 06:54
    0
    program z6;

    uses crt;

    var

    a:array[1 ... 260] of shortint;

    i, n, k, l:byte;

    s:longint;

    begin

    clrscr;

    randomize;

    write ('Vvedi razmernost massiva=') ; readln (n) ;

    for i:=1 to n do begin

    a[i]:=random (100--100+1) + - 100;

    write (a[i]:4) ;

    end;

    write ('Vvedi k=') ; readln (k) ;

    write ('Vvedi l=') ; readln (l) ;

    for i:=k to l do

    s:=s+a[i];

    write ('Summa chisel s k po l ravna ', s) ;

    readkey

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «дан массив размера N и целые числа K и L (1< = K ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы