Елементи кола пронумеровані так: 1-радіус, 2-діаметр, 3-довжина, 4-площа. Дано номер елемента і його значення. Знайти інші елементи​

составим таблицу:

                        | молоко  | лимонад | квас | вода

бутылка |       -          |              +          |      -      |      -

стакан    |          -          |            -           |      -      |      +

кувшин  |          +          |            -            |      -     |      -

банка      |          -            |            -           |      +    |        -

2.5 кбайт = 2560 -байт = 20480 бит

20480 : 2560  = 8

ответ: 8 минут.

вроде както так..

var a: integer;

s: string;

begin

  read(a);

  case a of

      1: s: ="i";

      5: s: ="v";

      10: s: ="x";

      50: s: ="c";

      100: s: ="c";

      500: s: ="i";

      1000: s: ="m;

  end;

  writeln(s);

end.

римские соответствия не все помню

var i: integer;

begin

  for i: = 35 to 87 do

      if i mod 7 =1 then

          writeln(i);

end.