Вопросы не очень сложные, нужна !​

uses crt; procedure Prost(a:longint;var f:boolean); var i:longint; begin if a<3 then f:=false else  begin   f:=true;   for i:=2 to round(sqrt(a)) do   if a mod i=0 then f:=false;  end; end; var  a,b,i,k:longint;      f:boolean; begin clrscr; repeat writeln('Введите диапазон натуральных чисел  a<b:'); readln(a,b); until (a>=0)and(b>a); k:=0; for i:=a to b do  begin   Prost(i,f);   if f then    begin     write(i,' ');     k:=1;    end;  end; if k=0 then writeln('Простых чисел в интервале ',a,' ',b,' нет!'); readln end.

Для начала определим что же такое генетическая информация. Это последовательность нуклеотидов в нуклеиновых кислотах ДНК и РНК. они разделены на участки - гены. И каждый из этих генов несет информацию о своем конкретном признаке - цвете глаз, кожи и о многих других других не столь заметных, но не менее важных, например, будут или нет у организма болезни передающиеся по наследству. То есть, грубо говоря, наследственная информация это "инструкция пользования" конкретным организмом. В ней хранятся все данные вплоть до протекающих в организме процессах. Потому знание и умение обращаться с данным источником информации имеет огромную важность. Как было выше сказано ранняя расшифровка на эмбриональной стадии развития конкретного организма позволит выявить и в некоторых случаях предотвратить наследственные заболевания. Кроме того умение изменять генетическую информацию лежит в основе такой науки как селекция. Именно за счет изменения исходных генетических кодов организмов возможно выведение новых пород животных и сортов растений, повышение их жизне Именно потому, что знание генетической информации необходимо и возникло такое инновационное направление биологической науки, как генная инженерия которая занимается расшифровкой генотипа организмов и изучением возможности их изменения.