Объяснение:
1. var i: integer;
var z, s: double;
begin
i := 1;
z := 512;
s := 0;
while i <= 10 do
begin
s := s + i/z;
inc(i);
z := z/2;
end;
writeln(s:0:2);
end.
2. var i, k: integer;
begin
i := 0;
k := 0;
repeat
inc(i);
if ((i mod 2) = 0) then inc(k);
until i=5;
write(k);
end.
3. var i, n: integer;
begin
i := 0;
n := 0;
while i<10 do
begin
n := random (31) + 10;
if ((n mod 2) = 0) then
begin
writeln(n);
inc(i);
end;
end;
end.
Дошёл до светлофора - ждёшь зелёный свет - смотришь на лево, если машин нет до идёшь до середины - смотришь на право, если машин нет переходишь дорогу полностью.
Алгоритм похода в магазин.
Взять деньги - выйти с квартиры - закрыть дверь - дойти до магазина - купить нужные предметы - вернуться назад - открыть дверь - зайти обратно в квартиру.
Алгоритм приготовления чаю.
Налить в чайник воду - поставить кипятьтся - подготовить кружку(если нет чистой кружки, то помыть) - кинуть пакетик в чай - воду из чайника вылить в кужку - насыпать сахар - наслаждаться чаем.
Надеюсь проблем с переводом на украинский язык не будет.