Помогите пожалуста с задачей! Очень нужно. В одномерном массиве найти сумму элементов в интервале [a,b], которые указываются с клавиатуры Заранее огромное спасибо
Catty
3.05.2004 5:12
Код
uses Crt; const n=10; var x:array[1..n] of byte; i,S,a,b:byte; begin clrscr; writeln('vvedite masiv'); for i:= 1 to n do read(x[i]); writeln('vvedite a i b'); read(a,b); S:=0; for i:=a to b do S:=S+x[i]; writeln(S); end.
Наташа
3.05.2004 23:21
Спасибо большое!!!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.