Напишите два варианта программы, которая вводит координаты точки на плоскости и определяет, попала ли эта точка в заштрихованную область. Один вариант программы должен использовать сложные условия, второй - обходится без них

в кинозале всего 16×32=512 мест. Сообщение о купленном билете однозначно определяет выбор одного из этих мест. Из уравнения 2 i = 512=29получаем: i=9 бит. Но эту же задачу можно решать иначе. Сообщение о номере ряда несет 4 бита информации, т.к. 24=16. Сообщение о номере места несет 5 бит информации, т.к. 25=32. В целом сообщение про ряд и место несет: 4+5=9 бит информации. Данный пример иллюстрирует выполнение закона активности информации (правило сложения): количество информации в сообщении одновременно о нескольких результатах независимых друг от друга событий равно сумме количеств информации о каждом событии отдельно.

ответ: На во ответил правильно, не понял тебе перевод нужен

Объяснение:не знаю ли тебе это:

program test;

uses crt;

var i,right,mark,v: longint;

   answer,true1,true2,true3,true4,true5: char;

begin

 right:=0;   // Счётчик правильных ответов

 v:=5;       // Количество во Правильный ответ на во Во Вариант ответа');

        writeln('b) вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true1 then inc(right);

     end;

     if i=2 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true2 then inc(right);

     end;

     if i=3 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true3 then inc(right);

     end;

     if i=4 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true4 then inc(right);

     end;

     if i=5 then begin

        writeln('Во Вариант ответа');

        writeln('b) Вариант ответа');

        writeln('c) Вариант ответа');

        read(answer);

        if answer=true5 then inc(right);

     end;

 end;

 if right>1 then mark:=right

 else mark:=2; // Оценка, если во больше 5, то там другая формула.

 writeln('Ваша оценка ',mark,'. Вы дали ',right,' правильных ответов');