Вычислите размеры следующих файлов: 1. 24-битное цветное растровое изображение с 1024 горизонтальными и 768 вертикальными пикселями в КБ.
2. Черно-белое растровое изображение с 2048 горизонтальными и 1024 768 вертикальными пикселями
3. Txt-файл со 150 символами в МБ.
4. 256 цветов растровое изображение с 1756 горизонтальных и вертикальных пикселей в 1055 КБ.

Дан це­ло­чис­лен­ный мас­сив из 20 элементов. Эле­мен­ты мас­си­ва могут при­ни­мать целые зна­че­ния от –10 000 до 10 000 включительно. Опи­ши­те на одном из язы­ков про­грам­ми­ро­ва­ния алгоритм, поз­во­ля­ю­щий найти и вы­ве­сти ко­ли­че­ство пар эле­мен­тов массива, в ко­то­рых сумма эле­мен­тов де­лит­ся на 2, но не де­лит­ся на 4. В дан­ной за­да­че под парой под­ра­зу­ме­ва­ют­ся два со­сед­них эле­мен­та массива.

Исходные дан­ные объ­яв­ле­ны так, как по­ка­за­но ниже на при­ме­рах для не­ко­то­рых язы­ков программирования. За­пре­ща­ет­ся ис­поль­зо­вать переменные, не опи­сан­ные ниже, но раз­ре­ша­ет­ся не ис­поль­зо­вать не­ко­то­рые из опи­сан­ных переменных.

 

 

БейсикPython

CONST N = 20 DIM A (1 TO N) AS INTEGER DIM I, J, K AS INTEGER FOR I = 1 TO N INPUT A(I) NEXT I … END

// до­пус­ка­ет­ся также использовать

// две це­ло­чис­лен­ные переменные

// j и k

a = []

n = 20

for i in range(0, n):

a.append(int(input()))

…

ПаскальАлгоритмический язык

const N = 20; var a: array [1..N] of integer; i, j, k: integer; begin for i := 1 to N do readln(a[i]); … end.

алг нач цел N = 20 целтаб a[1:N] цел i, j, k нц для i от 1 до N ввод a[i] кц … кон

Си

Объяснение:

using System;

class Program

{

   static int P(string p)

   {

       int a = 0, dec = 1;

       for (int i = p.Length - 1; i >= 0; i--)

       {

           a += (p[i] - '0') * dec;

           dec *= 10;

       }

       return a;

   }

   static void Main(string[] args)

   {

       int minSum = 1000000000, maxSum = 0, itMin = 0, itMax = 0;

       for (int i = 0; i < 10; i++)

       {

           int nowSum = 0;

           string a = Console.ReadLine();

           string[] now = a.Split(' ');

           for (int j = 0; j < now.Length; j++)

           {

               int n = P(now[j]);

               nowSum += n;

           }

           if (minSum > nowSum)

           {

               itMin = i;

               minSum = nowSum;

           }

           if (maxSum < nowSum)

           {

               itMax = i;

               maxSum = nowSum;

           }

       }

       Console.WriteLine("{0} - строка с минимумом, {1} - строка с максимумом", itMin + 1, itMax + 1);

       Console.ReadLine();

   }

}