В текстовом режиме экран разбивается на 30 строк по 60 символов в строке. Определите объем в Кбайт текстовой информации, занимающей внсь экран монитора если в кодировке КОИ-8 один символ весит 1 байт?​

1)

const

 n=3;

var

 a:array [1..n,1..n] of integer;

 i,j,count:integer;

begin

 count:=0;

 for i:=1 to n do

   begin

     for j:=1 to n do

       begin

         a[i,j]:=random(21)-10;

         write(a[i,j]:4);

         if (a[i,j] < 5) and (a[i,j] > 0) then

           inc(count);

       end;

     writeln;

   end;

 writeln('Количество элементов меньше пяти, но больше нуля равно ',count);

end.

2)

var

 t,o:integer;

begin

 write('Купленное количество тетрадей: '); readln(t);

 write('Купленное количество обложек: '); readln(o);

 t:=t*100; o:=o*50;

 writeln('Итоговая сумма покупки: ',t+o)

end.

import java.util.Scanner;

public class Main{

   public static void main(String[] args) {

       Scanner in = new Scanner(System.in);

       System.out.print("a: ");

       int a = in.nextInt();

       System.out.print("b: ");

       int b = in.nextInt();

       int s = 0;

       while (b < a) {

           System.out.println("Error b>=a");

           System.out.print("b: ");

           b = in.nextInt();

       }

       b = b + 1;

       for (int i = a;b > i; i++) {

           s += i*i;

       }

       System.out.print(s);

   }

}

Объяснение: