[Страдалецъ]

Прежде чем объяснять, хотелось бы определится с вашим уровнем знаний.
Можете объяснить, что делает код который я написал:

Код:

Var Val,i: Integer;
begin 
 for i := 1 to 6
 do ReadLn(Val); 
end.