Юзер вася чайников узнал, что у хакера вовы крутого появился новый cd-rom с игрой. поскольку у васи нет cd-rom привода, он решил скопировать себе игру с дискет. объем игры 700 мегабайт, объем дискеты 1.44 мегабайт, а всего у васи 12 дискет. путь от дома чайникова до дома крутого занимает полчаса. вопрос: сколько времени потратит вася, прежде чем обнаружит, что игра запускается только при наличии cd-romа?

1,44*12=17,28 мб - за один проход, за полчаса 700/17,28 = 40,51 раз он сходит туда и обратно 40,51*30 = 1215,27 минут; 20,25 часов

//pascalabc.net //версия 3.3, сборка 1634 (14.02.2018) begin   var a : = readinteger('возраст антона: ');   var b : = readinteger('возраст бориса: ');   var v : = readinteger('возраст виктора: ');   if (a > b) and (a > v) then begin println('антон старше всех'); exit; end;   if (b > a) and (b > v) then begin println('борис старше всех'); exit; end;   if (v > a) and (v > b) then begin println('виктор старше всех'); exit; end;   if (a > v) and (a = b) then begin println('антон и борис старше виктора.'); exit; end;   if (a > b) and (a = v) then begin println('антон и виктор старше бориса.'); exit; end;   if (v > a) and (v = b) then begin println('виктор и борис старше антона.'); exit; end;   if (a = b) and (b = v) then begin println('виктор, борис и антон одного возраста.'); exit; end; end.

Program serdce; uses graphabc,crt; var dx,dy,xc,x1,y1: integer; begin  hidecursor;   setpencolor(clblue);   setpenwidth(6);   line(300,300,150,150);     line(150,150,150,100);       line(150,100,180,80);       line(180,80,210,80);       line(210,80,300,130);         line(300,130,390,80);         line(390,80,420,80);           line(420,80,450,100);             line(450,100,450,150);             line(450,150,300,300);             floodfill(190,130,clred);     xc: =windowwidth div 2;   end.