Трудолюбивый муравей начал работать на строительстве муравейника. в первый день своей работы ему удалось найти и принести только 2 хвоинки, во второй в два раза больше, чем в первый и ещё одну хвоинку. каждый новый день он приносил в два раза больше, чем в предыдущий и ещё одну хвоинку. сколько принёс муравей за н день работы и сколько всего за н дней. (решить в паскале)

// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  var k,s:BigInteger;
  (k,s):=(2,2); // две травинки и всего две
  for var d:=2 to n do begin k:=2*k+1; s+=k end;
  Writeln('В день ',n,' принесено травинок: ',k,', всего: ',s)
end.

Примеры
n= 5
В день 5 принесено травинок: 47, всего: 88

n= 30
В день 30 принесено травинок: 1610612735, всего: 3221225439

n= 365
В день 365 принесено травинок: 112730043973143994938695068645888177314032762347599353793949966633546033205501205286257551922468897745532878847, всего: 225460087946287989877390137291776354628065524695198707587899933267092066411002410572515103844937795491065757328

Обозначим заработок за n дней как S(n).

Заработок по дням: 2, 5, 11, 23, 47.

Разница между членами последовательности:
3, 6, 12, 24 (геометрическая прогрессия).

3 = 2^1 + 2^0
6 = 2^2 + 2^1
12 = 2^3 + 2^2
24 = 2^4 + 2^3

2 + 5 + 11 + 23 + 47 = 2 + (2+3) + (2+3+3*2) + (2+3+3*2+3*2*2) + (2+3+3*2+3*2*2+3*2*2*2) = (2+s1) + (2+s2) + (2+s3) + (2+s4)
s1, s2, s3, s4 - это суммы геометрических прогрессий с q=2 и b1=3

Таким образом, S(n) = 2n + s1 + s2 + s3 + s4 +... s_{n-1} = 2n + 3(2^1 - 1) + 3(2^2 - 1) + ... + 3(2^{n-1} - 1) = 2n + 3(2^1 - 1 + 2^2 - 1 + ... + 2^{n-1} - 1) = 2n + 3(2(2^{n-1} - 1) - n + 1) = 2n + 3(2^n - 1 - n) = 3*2^n - 3 - n

На паскале заработок муравья за n дней можно посчитать так:
3*power(2, n) - 3 - n

Заработок в n-й день работы, причем n >= 2, так:
3*power(2, n - 1) - 1

uses math;

var n, d, t: integer;
begin
readln(n);
writeln('all days: ', 3*power(2, n) - 3 - n);
writeln('in last day: ', 3*power(2, n - 1) - 1);
end.

using System;

namespace restless

{

   class Visitor

   {

       private bool ticket;

       private int age;

       private int height;

       public void InputInfo()

       {

           c:

           Console.Write("Наличие билета: (Да/Нет): ");

           string t = Console.ReadLine().ToLower();

           if (t == "да")

               ticket = true;

           else if (t == "нет")

               ticket = false;

           else

           {

               Console.WriteLine("Вы ввели что-то не то...");

               goto c;

           }

           

           Console.Write("Ваш возраст: ");

           age = Convert.ToInt32(Console.ReadLine());

           Console.Write("Ваш рост: ");

           height = Convert.ToInt32(Console.ReadLine());

       }

       public bool CheckPeople()

       {

           if (ticket == true && age > 15 && height > 120)

               return true;

           return false;

       }

   }

   class Program

   {

       static void Main(string[] args)

       {    

           Visitor ch1 = new Visitor();

           ch1.InputInfo();

           if (ch1.CheckPeople())

               Console.WriteLine("Вам можно пройти!");

           else

               Console.WriteLine("Увы, но пройти Вам нельзя!");

       }

       

   }

}

Жесткий диск,  flash-память, компакт-диск, процессор.

Остальное относиться к видам памяти.

Принтер,  акустические колонки, наушники, микрофон.

Остальное относится к устройству воспроизведения/записи звука.

Системный блок,  центральный процессор, оперативная память, жесткий диск, блок питания.

Системный блок - включает в себя остальные вещи.

Системный блок,  клавиатура, мышь, монитор, акустические колонки.

Все остальное - это устройства ввода/вывода.

Видеокарта,  карта расширения, звуковая карта, сетевая карта.

Карта расширения - обобщение существующих карт.

Enter, End, Esc,  Delete  - 2 варианта:

Первый - Esc, потому как все остальные клавиши предназначены для работы с текстом.

Второй - Delete, так как он отличается первой буквой.

Цветной принтер,  лазерный принтер, матричный принтер,  струйный принтер.

Указанные принтеры могут быть как цветными, так и черно-белыми.