На бесконечном поле имеются две одинаковые вертикальные стены и одна горизонтальная соединяющая нижние концы стен длины стен неизвестны робот находится в одной из клеток расположенных между верхними краями вертикальных стен .как написать для робота алгоритм закрашивающий все клетки расположенные ниже горизонтальной стены непосредственно под ней?
Смотри, берешь зарядку от телефона отсоединяешь от блока , в итоге получается один провод , (если зарядка слитная и не разъединяется ищешь провод USB одно отверстие вставляется в разъем для зарядки телефона другое в ПК) вставляешь провод одним концом в телефон другой в пк, дальше заходишь на пк в проводник\папки и в разделе этот компьютер появится значок и название твоего телефона тыкаешь на него там должна быть папка с памятью телефона (если не отображает значок телефона или нет папки , нужно в телефоне разрешить отображать файлы. Обычно уведомление само приходит при подключении к ПК ) дальше нужный файл с компа перемещаешь в папку телефона. Все нужный файл перемещен
2. Почти ничего не меня получим код для цикла while:
var
i, n, k: integer;
begin
i := 2;
readln(n);
while i <= n div 2 do begin
if (n mod i) = 0 then k := i;
i:=i+1;
end;
writeln('наибольший делитель ', n, ' = ', k);
end.
3. Аналогично для цикла Repeat:
var
i, n, k: integer;
begin
i := 2;
readln(n);
repeat
if (n mod i) = 0 then k := i;
i:=i+1;
until i> n div 2;
writeln('наибольший делитель ', n, ' = ', k);
end.