зарание Маркированными списками являются:

Информатика
Математика
Биология
Химия
физика

о Информатика
o Математика
Биология
Химия
o
o
o
физика
o

1. Информатика
2. Математика
3. Биология
4. Химия
5. Физика
б. |​

биология

program xxx;

    var z,d,k : integer;

begin

  z: =2; d: =7; k: =0;

  while (d> =z) do

    begin

      d: =d-z;

        k: =k+1

      end;

  writeln(d,'    ',k);

  readln

end.

program dddd; uses crt; var a,b,c,i: integer; beginclrscr; c: =10; readln(a); while a < > 0 dobeginb: = a mod 10; if b < c then c: =b; a: = a div 10; end; writeln(c); readkey; end.