Скласти і зобразити графічно лінійний та розгалужений алгоритми за таких умов:
приватний підприємець п.коломієць відкрив депозитний рахунок у банку «аваль». яким
буде його прибуток від даного внеску на кінець року, якщо вклавши суму у 100 000 гривень
банк виплачує 42,00 % річних, а якщо сума буде меншою - то 36,00 % річних (при умові
щомісячної виплати дивідендів).

скласти і зобразити графічно лінійний та розгалужений алгоритми за таких умов:
мкп "дсм" цінні папери трастової компанії "кипарис". яким буде прибуток
фірми від володіння цінними паперами, якщо купивши їх у кількості 26 000 акцій (кожна з
них принесе 0,3 %) або 45 000 акцій при умові виплати 0,41% на кожну акцію.

Великий писатель, драматург, публицист, граф лев николаевич толстой родился 9 сентября (28 августа по старому стилю) 1828 года в имении ясная поляна крапивенского уезда тульской губернии (ныне щекинского района тульской области) в одном из самых знатных дворянских семейств. он был четвертым ребенком в семье. детство будущего писателя прошло в ясной поляне. он рано осиротел, потеряв сначала мать, которая умерла, когда мальчику было два года, а затем и отца. в 1837 году семья переехала из ясной поляны в москву. опекуншей осиротевших детей стала их тетка, сестра отца александра ильинична остен-сакен. в 1841 году, после ее смерти, юный толстой с сестрой и тремя братьями переехал в казань, где жила другая тетка - пелагея ильинична юшкова, ставшая их опекуншей. подробнее - на -

// 10.
var
  n: integer;
begin
  read(n);
  Write((n div 100 mod 2 = 0) or (n mod 10 mod 2 = 0) or (n mod 100 div 10 mod 2 = 0));
end.

// 11.
var
  n: integer;
  a,b,c:integer;
begin
  read(n);
  a:=n div 100; b:=n mod 100 div 10; c:=n mod 10;
  Write((a+b=c)or(a+c=b)or(c+b=a));
end.

// 12.
var
  n: integer;
  a,b,c,d:integer;
begin
  read(n);
  a:=n div 1000; b:=n mod 1000 div 10 div 10; c:=n mod 100 div 10; d:=n mod 10;
  Write(a+b+c+d-1=a*b*c*d);
end.

// 13.
var
  n,k: integer;
  a,b,c:integer;
begin
  Write('n,k= '); read(n,k);
  a:=n div 100; b:=n mod 100 div 10; c:=n mod 10;
  Write((b+c<k)and(a>5));
end.