Имена участников (разделяйте запятой).
Var a : array [1..5, 1..5] of integer; i, j : integer; begin randomize; for i := 1 to 5 do begin for j := 1 to 5 do begin ...
350:70=5 480:60=8 всё????
Раз у здоровых родителей родился альбинос, значит ген альбинизма является рецессивным. В такой ситуации родители могут быть только...
