Алмира скачала казахскую народную сказку «Жадный бай и Алдар-Косе». Количество страниц равно 3. В одну строку помещается 80 символов. На каждой странице по 51 строке. Определи информационный объем. Переведи его в КБайты. Составь обратную задачу и реши ее. Сверь свой ответ с данными.

¡¿‽!+(-₽(_₽7)'@-"-₽7

а) Ситуация: человек смотрит телевизор Источник: телевизор → Приёмщик: человек

b) Ситуация: пешеход переходит дорогу на зелёный свет светофора

Источник: светофор → Приёмщик: пешеход

c) Ситуация: ученик готовит доклад

Источник: книги, интернет, люди → Приёмщик: ученик

d) Ситуация: мама разговаривает со своей дочкой

Источник-приёмщик: мама → Приёмщик-источник: дочка

2)1. Звук барабана особенно популярен среди африканских племён. Он распространить сигнал о тревоге на несколько километров.

2. Для передачи сигнала на большие расстояния разные народы использовали дым костра.

3. Для передачи информации на дальние расстояния использовали гонцов.

4. С развитием письменности появилось такое средство дальней связи, как почта.

5. Радио является звуковым каналом передачи информации на большие расстояния. Это и общая развлекательная, и новостная информация.

6. Телефон является личным каналом информации. Используется людьми для общения.

7. Телевидение многоканальный канал информации. Происходит передача как звуковой, так и видеоинформации.

8. Спутники необходимы для передачи информации различного свойства на большие расстояния.

9. Сеть интернет «Всемирная паутина» является каналом связи для передачи различного вида информации.

Var
  arr : array [1..30] of integer;
  sum, count, i, a : integer;
begin
  read (a);
  for i := 1 to 30 do read (arr[i]);
  count := 0; sum := 0;
  for i := 1 to 30 do
  begin
    if arr[i] < 0 then sum := sum + arr[i]
    else if (arr[i] > 0) and (arr[i] <= a) then count := count + 1;
  end;
  writeln (sum, ' ', count);
end.

var
  arr : array [1..30] of integer;
  i : integer;
begin
  for i := 1 to 30 do read (arr[i]);
  for i := 30 downto 2 do
    if arr[i] * arr[i - 1] < 0 then // проверка знака
    begin
      writeln (i - 1); 
      halt; // Остановка программы
    end;
  writeln ('-1'); // Таких нет
end.