Держи. Код на С++,могу переделать под Паскаль.
1+1=2; 2*3=6; 6-1=5(кормим); 5*3=15; 15+1=16;
1==>2==>6==>5==>15==>16.
ответ: 13231
исследователи в разлычных научных и прикладных областях;
художники;
конструкторы;
специалисты по компютерной верстке;
дизайнеры;
разработчики рекламной продукции;
создатели Web-страниц;
авторы мултимедиа презентаций;
медики;
модельеры тканей и одежды;
фоторафы;
специалисты в области теле- и видеомонтажа и др.
Пусть р - это вероятность события при котором достается белый карандаш. Тогда 2^i=1/p
но i=4
p=1/16 - вероятность доставания белого карандаша
1/16=х/16 (х- кол-во белых)
Кол-во = 64/16=4 карандаша белого цвета
Var min, max, x: byte;
begin
max=0;
min:=100;
for x:= 10 to 99 do begin
if (x mod 10)+(x div 10)=7 then begin
writeln (x);
if x>max then max:=x;
if x