begin
	% control var 'i' not declare%
	integer s;
	s := 0;
	for i := 1 until 20 do s := s + i;
	write(s);
end