Question

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

Answer 1

алг r228
нач цел x,n
x:=0
ввод n
вывод n
если n>0 то x:=x+5 все
вывод x
кон