Алгоритмический язык бейсик паскаль алг нач цел s, k s: =100 нц для k от 0 до 10 s: =s-5 кц вывод s кон dim s as integer dim k as integer s = 100 for k = 0 to 10 s = s – 5 next k print s end var s, k: integer; begin s: = 100; for k: = 0 to 10 do s: = s - 5; writeln (s); end.

Var s, k:integer; - нам сказали, что все числа - целые
begin - это просто начало
s:= 100; - тут все ясно
for k:= 0 to 10 do - цикл,который выполнятеся 10-0+1=11 раз
s:= s - 5; - тело цикла
writeln (s); - вывод значения s
end. - конец программы

Тело цикла выполняется 11 раз и каждый раз из s вычитается 5. Т.е. всего s уменьшится на 11х5=55 и конечное значение будет равно 100-55=45.
Оно и будет выведено.
ответ. 45

45 ответ ОГЭ 9 класс

Задача 1:

using System;

using System.Collections.Generic;

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           int m;

           Console.Write("Введите m: ");

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

           int[] A = new int[m];

           List<int> listb = new List<int>();

           Console.WriteLine("Введите массив: ");

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

           {

               A[i] = Convert.ToInt32(Console.ReadLine());

               if (A[i] % 6 == 0) listb.Add(A[i]);

           }

           int[] B = listb.ToArray();

           Console.WriteLine("Полученный массив: ");

           for (int i = 0; i < B.Length; i++)

               Console.Write(B[i] + " ");

       }

   }

}

Задача 2:

using System;

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           int[,] A = new int[3,3];

           int sum = 0;

           Random r = new Random();

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

           {

               for (int j = 0; j < 3; j++)

               {

                   A[i, j] = r.Next(100);

                   Console.Write(A[i,j]+" ");

                   if (i + j == 3-1) sum += A[i,j];

               }

               Console.WriteLine();

           }

           Console.WriteLine("Сумма элементов на побочной диагонали матрицы = {0}",sum);

       }

   }

}

1) Определяем общее количество бит: 16 х 640 х 480 = 4 915 200
С учетом того, что в байте 8 бит, а 1 КБ=1024 Б получим
4 915 200 / 8 / 1024 = 600 (КБ)

2) Определяем общее количество бит с учетом того, что в палитре True Color для цвета отводится 24 бита: 1600 х 1200 х 24 = 46 080 000 (бит).
После преобразования файла для Интернет он будет представлен в восьмибитной палитре ( 256 = 2⁸ ) и займет объем
1400 х 900 х 256 = 10 080 000 (бит).
Разница в объемах составит  46 080 000 -  10 080 000 = 36 000 000 бит.
С учетом того, что в байте 8 бит, а в мегабайте 1024 х 1024 байт получим, что пространство на диске сократиться на
36 000 000 / (8 х 1024 х 1024) ≈ 4.29 (МБ)