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