Помогите решить задачу на Pascal.
 Дано: квадрат со стороной 5 см.
 Найти: периметр.
							
                                                        
                                                    Var side : integer;
begin
readln(side);
writeln(side * 4);
end.
Оцени ответ 
								
                            
		
                        