Кто-нибудь сможет перевести с паскаля на алгоритмический язык? var a, n, i, min, num : integer; beginmin: =50; num: =0; readln(n); for i: =1 to n do beginreadln(a); if a < min then min : = a; if a < –15 then num : = 1; end; writeln(min); if num > 0 tnen writeln(’yes’)else writeln(’no’)end. ​