Then listen and check. Which four things are not in the photos? 1
2.11
Match the equipment with photos 1-12 on page 69.
1 tent
map compass
compass rope rucksack satellite phone
sleeping bag sunglasses sunscreen gloves
torch stove tent insect repellent helmet
first aid kit waterproof clothes
Я думаю, что на добро каждый человек в нашем обществе, ведь у всех есть какие-то положительные качества в душе: доброта и ласка, понимание и сочувствие. Каким бы скромным ни было доброе дело, оно оставляет положительный след в душе, ведь приносит ощущение настоящего счастья. И я считаю, что это действительно так.Каждый слово «добро» понимает по-своему. Для одного – это сделать что-то в пользу человечества, а для другого – перевести бабушку через дорогу. И каждый из адресатов при этом испытывает счастье, то есть чувство полного удовлетворения. Это состояние человека вечным не бывает, а значит, полностью счастливого человека также не бывает. Но иногда… В отдельные минуты своей жизни мы чувствуем разное по объему и глубине счастье. И тут также как и с добром, для одного человека почувствовать счастье – это получить какой-то подарок, а для другого – прочитать письмо от близкого друга.
Каждое доброе дело, действительно, оставляет после себя очень большой след в душе человека и оказывает большое влияние на дальнейшую его жизни.
Поэтому я хочу, чтобы каждый, прочитавший эти слова, спешил творить добро и совершенствоваться. Ведь добро для других людей начинается с добра для себя. Для этого нужно не зацикливаться на своем «я» не идеализировать себя, потому что ничего абсолютно идеального в жизни не бывает, не смотреть презрительно на людей, не обращаться нагло с ними, не возносить себя выше других, а всегда быть приветливым и ласковым,чаще улыбаться, уважать людей, уметь анализировать свое поведение и работать над собой. Именно тогда, когда мы сможем беспрепятственно все это осуществлять, мы будем готовы и к настоящему добру.Давайте совершенствовать себя и спешить делать добро, получать душевное богатство.
n=10;
var
a:array[1..n]of integer;
min,max,i,s:integer;
begin
for i:=1 to n do
read(a[i]);{вводим последовательность через пробел, последний элемент ENTER}
min:=1;max:=1;
{поиск индекса мин и макс}
for i:=2 to n do
begin
if a[i]<a[min]then
min:=i;
if a[i]>a[max]then
max:=i;
end;
{Если индекс мин меньше чем индекс макс то}
if max>min then
for i:=min to max do
s:=s+a[i]
else {если индекс макс меньше чем индекс мин}
for i:=max to min do
s:=s+a[i];
writeln(' S= ',s);
end.