В тундре мало дорог. По болотистой местности не проедешь на колёсах в тяжёлой телеге. Поэтому круглый год ездят на лёгких санях-нартах, которые хорошо скользят как по снегу, так и по мху.
На нартах ненцы-оленеводы перевозят свои чумы в разобранном виде.
Ненцы занимаются не только оленеводством, но и охотой на песцов, волков и других зверей, на птицу.
В царской России ненцы жили очень плохо. Купцы, приезжавшие в тундру, обманывали их, спаивали водкой и, за дешёвую цену, скупали оленей и дорогие звериные шкуры.
В тундре отсутствовали школы и больницы. Все ненцы были неграмотны. Много взрослых и детей умирало от заразных болезней.
Ветеринарных врачей, которые лечат животных, тоже не было, поэтому от различных болезней часто погибали большие стада оленей.
Теперь жизнь ненцев сильно изменилась. Возникли постоянные селения. Кроме жилых зданий, в них строятся школы с интернатами, больницы, клубы, магазины, почта.
С каждым годом в колхозах увеличивается количество оленей, организуются молочно-товарные фермы, а также фермы по разведению ценных пушных зверей.
Стало развиваться в тундре и сельское хозяйство. Учёные провели опыты по выращиванию различных растений.
В тундре стали сеять ячмень, овёс и другие зерновые культуры, разводить картофель, капусту, репу, турнепс и лук. В некоторых местах начали сажать ягодные кустарники.
Program uborka; var a,b,c: integer; //количество вещей в стопках k: real; //минимальное количество ходов. вещественное, т.к. результат деления sa: integer; //среднее арифметическое. к-во вещей должное быть в каждой стопке begin writeln ('введите a, b и c через пробел'); readln (a, b, c); if ((a+b+c) mod 3) = 0 //если сумма вещей делится на 3 нацело then begin sa:=((a+b+c) div 3); //среднее арифметическое выражаю через результат целочисленного деления, т.к иначе конфликт типов k:=(abs(sa-a)+abs(sa-b)+abs(sa-c))/2; //к-во шагов - это половина суммы модулей разности СА и каждой полки writeln (k) end else writeln ('IMPOSSIBLE') end.
program shariki; {n - всего шариков (от 0 до 100 вкл) a - время на надувание 1-го шарика (от 1 до 100 вкл) k - мах кол-во шариков, которое понадобится надуть одному из 2-ух мальчиков t - мин кол-во времени на надувание всех шариков двумя мальчиками} var n, a, k, t: integer; begin writeln ('введите n и a через пробел'); readln (n,a); k:=(n div 2)+(n mod 2);//делим к-во шариков на 2 мальчика и прибавляем лишний при наличии t:=k*a; writeln (t) end.
program otoplenie; {k - кол-во кубометров на 1 батарею (<=2*109) h - высота комнаты (<=105) w - ширина комнаты (<=105) l - длина комнаты (<=105)} var h, w, l, k, v, n: integer; begin writeln ('введите h, w, l, k через пробел'); readln (h, w, l, k); n:=((h*w*l) div k); if ((h*w*l) mod k)>0 then n:=n+1; {делим объем комнаты на объем воздуха для одной батареи (берем только целую часть). если нацело не делится, то к целому от деления прибавляем еще 1 батарею для обогрева остатка} writeln (n) end. здесь, как я понимаю, вводимые данные не могут быть <= нулю, поэтому нулевые и отрицательные варианты не рассматривались
Program uborka; var a,b,c: integer; //количество вещей в стопках k: real; //минимальное количество ходов. вещественное, т.к. результат деления sa: integer; //среднее арифметическое. к-во вещей должное быть в каждой стопке begin writeln ('введите a, b и c через пробел'); readln (a, b, c); if ((a+b+c) mod 3) = 0 //если сумма вещей делится на 3 нацело then begin sa:=((a+b+c) div 3); //среднее арифметическое выражаю через результат целочисленного деления, т.к иначе конфликт типов k:=(abs(sa-a)+abs(sa-b)+abs(sa-c))/2; //к-во шагов - это половина суммы модулей разности СА и каждой полки writeln (k) end else writeln ('IMPOSSIBLE') end.
program shariki; {n - всего шариков (от 0 до 100 вкл) a - время на надувание 1-го шарика (от 1 до 100 вкл) k - мах кол-во шариков, которое понадобится надуть одному из 2-ух мальчиков t - мин кол-во времени на надувание всех шариков двумя мальчиками} var n, a, k, t: integer; begin writeln ('введите n и a через пробел'); readln (n,a); k:=(n div 2)+(n mod 2);//делим к-во шариков на 2 мальчика и прибавляем лишний при наличии t:=k*a; writeln (t) end.
program otoplenie; {k - кол-во кубометров на 1 батарею (<=2*109) h - высота комнаты (<=105) w - ширина комнаты (<=105) l - длина комнаты (<=105)} var h, w, l, k, v, n: integer; begin writeln ('введите h, w, l, k через пробел'); readln (h, w, l, k); n:=((h*w*l) div k); if ((h*w*l) mod k)>0 then n:=n+1; {делим объем комнаты на объем воздуха для одной батареи (берем только целую часть). если нацело не делится, то к целому от деления прибавляем еще 1 батарею для обогрева остатка} writeln (n) end. здесь, как я понимаю, вводимые данные не могут быть <= нулю, поэтому нулевые и отрицательные варианты не рассматривались
В тундре мало дорог. По болотистой местности не проедешь на колёсах в тяжёлой телеге. Поэтому круглый год ездят на лёгких санях-нартах, которые хорошо скользят как по снегу, так и по мху.
На нартах ненцы-оленеводы перевозят свои чумы в разобранном виде.
Ненцы занимаются не только оленеводством, но и охотой на песцов, волков и других зверей, на птицу.
В царской России ненцы жили очень плохо. Купцы, приезжавшие в тундру, обманывали их, спаивали водкой и, за дешёвую цену, скупали оленей и дорогие звериные шкуры.
В тундре отсутствовали школы и больницы. Все ненцы были неграмотны. Много взрослых и детей умирало от заразных болезней.
Ветеринарных врачей, которые лечат животных, тоже не было, поэтому от различных болезней часто погибали большие стада оленей.
Теперь жизнь ненцев сильно изменилась. Возникли постоянные селения. Кроме жилых зданий, в них строятся школы с интернатами, больницы, клубы, магазины, почта.
С каждым годом в колхозах увеличивается количество оленей, организуются молочно-товарные фермы, а также фермы по разведению ценных пушных зверей.
Стало развиваться в тундре и сельское хозяйство. Учёные провели опыты по выращиванию различных растений.
В тундре стали сеять ячмень, овёс и другие зерновые культуры, разводить картофель, капусту, репу, турнепс и лук. В некоторых местах начали сажать ягодные кустарники.