Составить программу для вычисления площади боковой поверхности цилиндра s = 2п r h (qbasik) !

uses crt,graph; type mas=array[1..500] of Pointtype; var gd,gm,i,j,k,n:integer;     a:mas; begin randomize; gd:=0; initgraph(gd,gm,''); for i:=1 to 500 do  begin   a[i].x:=random(getmaxX);   a[i].y:=random(getmaxY);   circle(a[i].x,a[i].y,2);  end; k:=0;n:=0; repeat k:=k+1; delay(200); setcolor(0); for i:=1 to 500 do circle(a[i].x,a[i].y,2); for i:=1 to 500 do  begin   if a[i].y>getmaxY-n-10 then a[i].y:=1   else a[i].y:=a[i].y+3;   if a[i].x<0 then a[i].x:=getmaxX   else a[i].x:=a[i].x-1;  end; setcolor(15); for i:=1 to 500 do circle(a[i].x,a[i].y,2); if k mod 20=0 then  begin   n:=n+1;   line(0,getmaxY-n,getmaxX,getmaxY-n);  end; until keypressed; readln end.

ответ: 7*2^8 = 1792

Объяснение:

Не знаю я толком как такие задачи решать, но можно попробовать следующий подход:

Пусть, для начала Ира берет из мешка 7 конфет и раскладывает их по семи полочкам. Мы можем обозначить конфеты Красная Шапочка нулем (0), а конфеты Мишка на Севере - единицей (1). Тогда, в силу случайности процесса, после раскладки нулей и единиц по полочкам может получиться случайное двоичное число. Всего возможных комбинаций - семизначных двоичных чисел может быть 2^7 (два в седьмой степени) - это вытекает из определения семизначного двоичного числа.

Теперь добавляем в рассмотрение восьмую конфету, Красную Шапочку (КШ). Ее можно положить на любую из семи полочек. Каждое новое расположение КШ даст 2^7 комбинаций остальных семи конфет. Таким образом получаем 7*2^7 комбинаций. Еще столько же комбинаций даст восьмая конфета Мишка на Севере (МН). Таким образом, всего комбинаций будет 2*7*2^7 = 7*2^8 = 7*256 = 1792.