Выполнить 3 95 подробно в питоне

Program ulitka; var sunnyday: array [1..30] of boolean; a, b, c, i: integer; begin writeln('a = '); readln(a); writeln('b = '); readln(b); b : = b * 100; randomize; for i : = 1 to 30 do begin if random(2) = 1 then sunnyday[i] : = true else sunnyday[i] : = false; end; for i : = 1 to 30 do begin if sunnyday[i] = true then begin a : = a + 2; if a > b then a : = b; end else begin a : = a - 1; if a < 0 then a : = 0; end; end; writeln('дни месяца были таковы: '); for i : = 1 to 30 do begin if sunnyday[i] = true then writeln(i, '. солнечный') else writeln(i, '. пасмурный') end; writeln('к концу 30 дня местоположение улитки равно ', a, ' см над землей'); readln; end.

Uses crt; const n=30; var c: array[1..n] of integer; a,b,i: integer; begin randomize; writeln('на какой высоте была улитка'); readln(a); writeln('ведите длину ветки'); readln(b); for i: =1 to n do begin c[i]: =random(2)-0; {1-солнечно; 0-пасмурно} writeln(c[i]); end; writeln; for i: =1 to n do if (c[i]=0) then a: =a-1 else a: =a+2; writeln(a,'см'); if a> b then writeln('улитка переползла ветку'); if a=b then writeln('улитка вернулась в начальное положение'); if a=0 then writeln('улитка спустилась до земли'); end.