Паскаль
10-11 класс
|
Дано число n, вектор а=(а1,а2,...аn) и числа AиВ (А<B) Найти сумму тех координат ak, для которых выполняется условие: А≤аk≤В.
for i:=A to B do begin
k := k + a[i];
end;
writeln(k);
Другие вопросы из категории
приготовления супа, если его нужно готовить ровно: а) 5 мин; б) 7 мин; в) 10 мин
каждого маршрута равновероятно. Сообщение о том, что на остановку подошел трамвай №5 содержит 4 бита информации. Сколько маршрутов трамваев останавливается на данной остановке?
Читайте также
2.написать программу в паскале
f(x)=2(sin*sin)x+1
constructor и destructor и для чего нужна?
4) Что такое implementation и для чего нужна?
5) Назовите модули Паскаль ( в строке Uses, например crt) и какие возможности этот модуль дает?
6) Что за тип переменной: указательный (Pointer)
7) И на последок: что означает символ @ , #, $ , ^
б)y=x^15
Постараться использовать минимальное количество дополнительных переменных.
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Схема циклического обмена: a ← b ← c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
Вот код Паскаль:
var
f:array[1..500] of record
fam:string;
bal:boolean;
end;
buf:boolean;
str:string;