Надобно перевести программку с Паскаля на Кумир,срочно помогите пожалуйста !!!!Program r228;var

Надобно перевести программку с Паскаля на Кумир,безотлагательно помогите пожалуйста !!!!
Program r228;
var n,x: integer;
begin
x:=0;
Writeln('Введите число');
Readln(n);
If ngt;0 then
x:=x+5;
Writeln(x);
end.