1. Ви плануєте класом піти в похід до лісу. Знайдіть відомості про орієнтування в лісі без компаса та прийоми виживання у складних погодних

умовах. Створіть у текстовому процесорі пам'ятку зі знайденими відомостями. У

табличному процесорі виконайте розрахунки кількості питної води, потрібної

для походу залежно від його тривалості та кількості учасників, і вартості

покупки потрібної кількості води залежно від ємності упаковок. Будь ласка до ть! Дуже треба!

"солнце" - круг с точкой в центре

"идти" - две ноги

"хлеб" - полукруг

"рот" - сильно вытянутый   полуовал

всего длина окружности составляет 2пr, а половина - пr

var

a: integer;

begin

readln(n);

writeln('сумма цифр числа ',a,' равна', a div 100+(a mod 100) div 10 +a mod 10);

end.

var

a: integer;

begin

readln(n);

writeln((a mod 10)*100+((a mod 100) div 10)*10 +a div 100);

end.

1)

var a,b,c,d: real;

begin

  read(a,b);

  c: =(a+b)/2;

  d: =2*a*b;

  if a> b then begin

    a: =d;

    b: =c;

  end;

  if a< b then begin

  a: =c;

  b: =d;

  end;

  writeln(a,' ',b);

end.

2)

var a,b: integer;

begin

  read(a,b);

  if (a< 1) or (a> 31) then writeln(' день введен неправильно');

  if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');

end.

3)

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b)and(a> c)then writeln(a);  

    if (b> a)and(b> c)then writeln(b);

  if (c> b)and(c> a)then writeln(c);

end.