ребята, помогите чайнику!!

[gordun]

нужно перевести этот код на обычный язык, и если можно составить блок схему

const N=__;
Var s,max:Real;
i:Integer;

Begin

Write('s=');
ReadLn(s);
max:=s;
i:=2;

While i<=N do 
Begin
Write('s=');
ReadLn(S);
i:=i+1;
if max<s then max:=s
end; 

WriteLn('max=',max);
ReadLn

End.

[Stilet]

Обычный это по-русски?

[min@y™]

ребята, помогите чайнику!!

Чем помочь, что не получается?