Lazarus ЗАДАЧА 1. На формі розміщено: Edit1, Label1, Label2,Button1. Вводимо до Едит1 свій рік народження і натискаємо кнопку. В Лейбл2 з‘являється напис в залежності від кількості років. Якщо 18 і більше – «Ви повнолітні!», якщо менше – «Ви дитина».

program raf105;

var  

 white,blue,red,x,y,z: integer;

 w,b,r: boolean;

begin

writeln('Ввод:');

readln(white, blue, red, x, y, z);

repeat

 w:= false;

 b:= false;

 r:= false;

 if white >= x

   then begin

     white-= x;

     blue+= 1;

   end

   else w:= true;

 if blue >= y

   then begin

     blue-= y;

     red+= 1;

   end

   else b:= true;

 if red >= z

   then begin

     red-= z;

     white+= 1;

   end

   else r:= true;

until w and b and r;

writeln('Вывод:');

writeln(white,' ', blue,' ', red);

end.

Смотри, берешь зарядку от телефона отсоединяешь от блока , в итоге получается один провод , (если зарядка слитная и не разъединяется ищешь провод USB одно отверстие вставляется в разъем для зарядки телефона другое в ПК) вставляешь провод одним концом в телефон другой в пк, дальше заходишь на пк в проводник\папки и в разделе этот компьютер появится значок и название твоего телефона тыкаешь на него там должна быть папка с памятью телефона (если не отображает значок телефона или нет папки , нужно в телефоне разрешить отображать файлы. Обычно уведомление само приходит при подключении  к ПК ) дальше нужный файл с компа перемещаешь в папку телефона. Все нужный файл перемещен